End Sub
程序运行后,如果在文本框Text1中输入BeijingChina,则在文本框Text2中显示的内容是
A)BeijingChina B)China C)Beijing D)BeijingC
(19)在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:
Private Sub Form_Load()
List1.AddItem "Item 1"
List1.AddItem "Item 2"
List1.AddItem "Item 3"
End Sub
Private Sub Command1_Click()
List1.List(List1.ListCount) = "AAAA"
End Sub
程序运行后,单击命令按钮,其结果为
A)把字符串“AAAA”添加到列表框中,但位置不能确定
B)把字符串“AAAA”添加到列表框的最后(即“Item 3”的后面)
C)把列表框中原有的最后一项改为“AAAA”
D)把字符串“AAAA”插入到列表框的最前面(即“Item 1”的前面)
(20)假定有如下事件过程:
Private Sub Form_Click()
Dim x As Integer, n As Integer
x = 1
n = 0
Do While x < 28
x = x * 3
n = n + 1
Loop
Print x, n
End Sub
程序运行后,单击窗体,输出结果是
A)81 4 B)56 3
C)28 1 D)243 5
(21)有如下程序:
Private Sub Form_Click()
Dim Check, Counter
Check = True