单项选择题

在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：

PrivateSub Form_Load()

List1.AddItem "Item1"

List1.AddItem "Item2"

List1.AddItem "Item3"

End Sub

Private Sub Command1_Click()

List1.List(List1.Listcount) ="AAAA"

End Sub

程序运行后，单击命令按钮，其结果为

A．把字符串"AAAA"添加到列表框中，但位置不能确定
B．把字符串"AAAA"添加到列表框的最后(即"Item3"的后面)
C．把列表框中原有的最后一项改为"AAAA"
D．把字符串"AAAA"插入到列表框的最前面(即"Item1"的前面)

<上一题目录下一题>

热门试题

单项选择题

在窗体上添加一命令按钮，其名为Command1，然后编写代码如下： private Sub Command1_Click() Dim an(5) As Integer，arrl(5) As Integer n=3 For i=1 To 5 arr(i)=i arrl(n)=2*n+i Next Print arrl(n);arr(n) End Sub 程序的运行结果为

A．3 11
B．11 3
C．13 3
D．3 13

单项选择题

在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text1和Text2。编写如下两个事件过程： Dim Str1 As String，str2 As String Private Sub form_load() Text1.Text= Text2.Text= Text1.Enabled=False Text2.Enabled=False End Sub Private Sub Form_KeyPress(KeyAscii As Integer) str1=str1 & Chr(KeyAscii) End Sub Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) str2=str2 & Chr(KeyCode) End Sub Private SubCommand1_Click() Text1.Text=str1 Text2.Text=str2 str1= str2= End Sub 当在设计阶段的窗体的KeyPreview属性设置为True时，程序运行过程中，在键盘上输入小写字母abc，然后单击命令按钮，则文本框Text1中显示的内容为

A．abc
B．不显示任何信息
C．ABC
D．出错

相关试题