在窗体上有两个文本框控件,名称分别为Text1和Text2,以下程序实现的功能是希望在文本框Text1中输入字符时,输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示,下划线处应填( )。Private Sub Text1_ _________() TextText=Text1.Text End SubA.SetFocusB.ChangeC.GetFocusD.Click
在窗体上有两个文本框控件,名称分别为Text1和Text2,以下程序实现的功能是希望在文本框Text1中输入字符时,输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示,下划线处应填( )。
Private Sub Text1_ _________() TextText=Text1.Text End Sub
A.SetFocus
B.Change
C.GetFocus
D.Click
相关考题:
窗体上有名称分别为Text1、Text2的2个文本框,要求文本框Text1中输入的数据小于500,文本框Text2中输入的数据小于1000,否则重新输入。为了实现上述功能,在以下程序中问号(?)处应填入的内容是。Private Sub Text1_LostFocus()Call CheckInput(Text1,500)End SubPrivate Sub Text2_LostFocus()Call CheckInput(Text2,1000)End SubSub CheckInput(t As ?,x As Integer)If Val(t.Text)x ThenMsgBox"请重新输入!"End IfEnd SubA.TextB.SelTextC.ControlD.Form
( 28 ) 窗体上有名称分别为 Text1 、 Text2 的 2 个文本框 , 要求文本框 Text1 中输入的数据小于 500 , 文本框 Text2 中输入的数据小于 1000 ,否则重新输入。为了实现以上功能,在下列程序中问号( ? )处应填入的内容是( )。Private Sub Text1_LostFocus( )Call CheckInput(Text1,500)End SubPrivate Sub Text2_LostFocus( )Call CheckInput(Text2,1000)End SubSub CheckInput(t As ?,x As Integer)If Val(t.Text)x ThenMsgBox" 请重新输入 !"End IfEnd SubA ) TextB ) SelTextC ) ControlD ) Form
窗体上有名称分别为Text1、Text2的2个文本框,要求文卒框Text1中输入的数据小于500,文本框Text2中输入的数据小于1000,否则重新输入。为了实现上述功能,在以下程序中问号(?)处应填入的内容是______。 Private Sub Text1 LostFocus() Call CheckInput(Text1,500) End Sub Private Sub Text2 LostFocus() Call CheCkInput(Text2,1000) End Sub Sub CheckInput(t AS ?,x As Integer) If Val(t.Text)>X Then MsgBox "请重新输入!" End If End SubA.TextB.SelTextC.ControlD.Form
在窗体上画两个名称分别为Text1、Text2的文本框。Text 1的Text的属性为“DataBase”,如图所示。 现有如下事件过程 Private Sub Text1_Change( ) Text 2.Text=Mid(Text1,1,5) End Sub 运行程序,在文本框Text1中原有字符之前输入a,Text2中显示的是( )。A.DataAB.DataBC.aDataD.aBase
新建一个工程,在窗体中创建两个文本框,其名称分别为Text1和Text2。编写一个事件过程,实现在程序运行后,若在文本框Text1中输入一个字符串。若该字符串超过15个字符后,超出部分在文本框Text2中显示。如图12所示程序中不得使用任何变量。注意:存盘时必须存放在考生文件夹下,工程文件名为ylc4.vbp,窗体文件名为ylc4.frm。
在窗体上有两个文本框控件和一个命令按钮,名称分别为Text1、Text2和Command1,以下程序实现的功能是当单击Command1按钮时,将把Text2控件中的文本全部选中,并把焦点设置在该文本框中。程序运行时的界面如图20-4所示,以下两空应填( )。Private Sub Command1_Click() TextSelStart=0 Text________=Len(TextText) Text_______ End SubA.SelLength SetFocusB.SelText SetFocusC.SelLength GetFocusD.SelText GetFocus
在窗体上画两个名称分别为Text1、Text2的文本框,一个名称为Label1标签,窗体外观如图a所示,要求当改变任一个文本框的内容,就会将该文本框的内容显示在标签中,如图b所示。实现上述功能的程序如下:Private Sub Text1_Change( )Call ShowText(Text1)End SubPrivate Sub Text2_Change( )Call ShowText(Text2)End SubPrivate Sub ShowText(T As TextBox)Labell.Caption=文本框中的内容是:&T.TextEnd Sub关于上述程序,以下叙述中错误的是( )。A.ShowText过程的参数类型可以是ControlB.ShowText过程的参数类型可以是VariantC.两个过程调用语句有错,应分别改为Call ShowText(Text1,Text)、Call Show Text (Text2,Text)D.ShowText过程中的T是控件变量
在窗体上绘制两个文本框,名称分别为Text1和Text2。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,若在Text1中每输入一个字符,则显示输入的内容,同时在Text2中显示一个“*”。若在Text2中每输入一个字符,则显示—今“*”,如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为 execise40.vbp,窗体文件名为execise40.frm。
在名为Form1的窗体上绘制两个文本框,名称分别为Text1和Text2(如下图所示),初始情况下都没有内容。请编写适当的事件过程,使得程序在运行时,在Text1中输入的任何字符,立即显示在Text2中。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为execise7/vbp,窗体文件名为execise7.frm。