计算机二级
在窗体上画一个文本框(名称为Textl)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以F可以实现上述操作的事件过程是（ ）
题目
在窗体上画一个文本框(名称为Textl)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以F可以实现上述操作的事件过程是（ ）
相似问题和答案
第1题：
（ 17 ） 在窗体上画一个文本框 （ 其名称为 Text1 ） 和一个标签 （ 其名称为 Label1 ） ， 程序运行后 ， 如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是
A ） Private Sub Text1_Click()
Label1.Caption = Text1.Text
End Sub
B ） Private Sub Text1_Change()
Label1.Caption = Text1.Text
End Sub
C ） Private Sub Label1_Change()
Label1.Caption = Text1.Text
End Sub
D ） Private Sub Label1_Click()
Label1.Caption = Text1.Text
End Sub
第2题：
（ 15 ）在窗体上画一个文本框（名称为 text1 ）和一个标签（名称为 label1 ） , 程序运行后，在文本框中每输入一个字符 ， 都会立即在标签中显示文本框中字符的个数 ， 以下可以实现实现上述操作的事件过程是
A ）
Private Sub Text1_Change()
Label1.Caption = Str(Len(Text1.Text))
End Sub
B ）
Private Sub Text1_Click()
Label1.Caption = Str(Len(Text1.Text))
End Sub
C ）
Private Sub Text1_Change()
Label1.Caption = text1.text
End Sub
D ）
Private Sub label1_Change()
Label1.Caption = Str(Len(Text1.Text))
End Sub
第3题：
在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程： 程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入一个具有大小写的字符串，则在标签中显示的内容全部为大写。请填空。
【解析】文本框内容发生变化的事件是Text1_Change，这时将此变化送到标签的标题上显示。
第4题：
在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：
程序运行后，单击命令按钮，在文本框中显示的值是__________。
30【解析】本题考查VBA中二维数组和循环的知识。本题属于比较简单的问题，使用了二重循环为二维数组进行了部分赋值，最后求两个数组元素值并求和，注意这两个元素是否已被赋值，若没有赋值则为0。本题中对于a(2，3)赋值为2*3也就是6，a(4，6)赋值为4*6也就是24，最后的结果为6 24=30。
第5题：
创建名称为Form1，标题名为“请输入密码”的窗体。在窗体上画一个标签，名称为 Label1，标题为“请输入您的密码”。在标签的下方画一个文本框，名称为“密码框”，其高度和宽度分别为2000和500。要求在输入密码时，文本框中显示“*”字符。以上这些设置必须在设计过程中进行，运行时的窗体如图1所示。程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为ylcl．vbp，窗体文件名为ylcl.frm。
(1)Visual Basic集成环境中，执行“文件”→“新建工程”命令，选择“标准Exe”。在Form1的属性窗口中，将Caption属性设置为“输入密码”。 (2)在工具箱中选择标签控件，在窗体上创建标签，在属性窗口中将Caption，属性设置为“请输入您的密码”。在工具箱中选择文本框控件，在标签下方画出文本框，在文本框属性窗口中，将Height属性设置为500，将Width属性设置为2000，将PasswordChar属性设置为“*”。 (3)按F5键运行程序，在文本框中输入字符，显示如图1所示。 (4)执行“文件”→“保存工程”命令，将工程文件命名为ylcl.vbp，窗体文件命名为 ylcl.frm。
第6题：
窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell)。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是 ______。
A．Private Sub Text1_Change() Labell.Caption=Text1.Text End Sub
B．Private Sub Text1_Click() Labell.Caption=Text1.Text End Sub
C．Private Sub Labell_Change() Labell.Caption=Text1.Text End Sub
D．Private Sub Labell_Click() Labell.Caption=Text1.Text End Sub
解析：当在文本框中输入字符时，文本框的内容发生变化，所以应把程序写在Text1_Change()事件中。
第7题：
在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell)，程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是______。
A． Private Sub Text1 Click() Labell.Caption=Text1.Text End Sub
B．Private Sub Text1_Change() Labell.Caption=Text1.Text End Sub
C．Private Sub Labell_Change() Labell.Caption=Text1.Text End Sub
D．Private Sub Labell_Click() Labell.Caption=Text1.Text End Sub
解析：TextBox控件中，Text属性是用来显示文本内容的。Change事件是在TextBox控件的Text内容发生改变时触发。Click事件是在用户鼠标单击文本时触发。
第8题：
在窗体上画一个文本框（其名称为 Text1）和一个标签（其名称为 Label1），程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容，以下可以实现上述操作的事件过程是（ ）。
A．Private Sub Text1_Click（）
Label1.Caption=Textl.Text
End Sub
B．Private Sub Text1_Change（）
Label1.Caption=Text1.Text
End Sub
C．Private Sub Label1_Ctrange（）
Label1.Caption=Text1.Text
End Sub
D．Private Sub Label1_Click（）
Label1.Caption=Text1.Text
End Sub
第9题：
在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Textl、Labell和Command1，然后编写如下两个事件过程：
Private Sub Commandl_Click()
S$=InputBox(”请输入一个字符串”)
Textl．Text=S$
End Sub
Private Sub Textl Change()
Label1．Caption=UCase(Mid(Text1．Text，7))
End Sub
程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“VisualBasic”，则在标签中显示的内容是【 】。
BASIC 解析：MID返回文本字符串中从指定位置开始的特定数目的字符，其格式为：MID(text，start num，hum—chars)，Text包含要提取字符的文本字符串。Start—num文本中要提取的第一个字符的位置。因此，本题是要截取“VisualBasic”从第7个字符起右侧的所有字符。UCase函数将小写字母转换为大写字母。
第10题：
窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Label1)。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是： ______。
A．Private Sub Text1_Change() Label1.Caption=Text1.Text End Sub
B．Private Sub Text1_Click() Label1.Caption=Text1.Text End Sub
C．Private Sub Label1_Change() Label1.Caption=Text1.Text End Sub
D．Private Sub Labell_Click() Label1.Caption=Text1.Text End SUb
解析：当在文本框中输入字符时，文本框的内容发生变化，所以应把程序写在Text1_Change()事件中。