单项选择题

在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：
Private Sub Form_Load0
　List1.AddItem"Item 1"
　List1.AddItem"Item 2"
　Lis1.AddItem"Irem 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”的前面)
<上一题 目录 下一题>
热门 试题

单项选择题
单击命令按钮时，下列程序代码的执行结果为( )。 Private Function PickMid(xStr As String)As Sting Dim tempStr As String Dim strLen As Integer TempStr= StrLen=Len(xStr) i=1 Do While i＜=strLen 2 tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr,strLen-i+1,1) i=i+1 Loop PickMid=tempStr End Function Private Sub Command1_Click() Dim FirstStr As String FirstStr= abcdef Print PickMid(FirstStr) End Sub
A．abcdef
B．afbecd
C．fedcba
D．defabc
单项选择题
下面程序运行时，单击窗体后，窗体上显示的结果是( )。 Private Sub Form_Click Dim I As Integer Dim sum As Long Dim t1 As Long t1=1:sum=0 For 1=1 To 3 t1=t1*I sum=sum+t1 Next I Print sum End Sub
A．3
B．9
C．5
D．6
相关试题