问题
单项选择题
在窗体上建立一个名称为List1的列表框、一个名称为Text1文本框和一个名称为 Command1的命令按钮，如图20-12如示。程序代码如下，如果在程序运行过程中单击命令按钮，则在文本框中显示的内容是( )。
Private Sub Command1_Click()
Dim i As Integer
Text1．Text=" "
For i=0 To List1．ListCount
If i Mod 2=1 Then
Text1．Text=Text1．Text+List1．List(i)
End If
Next i
End Sub
Private Sub Form_Load()
List1．AddItem"英语"
List1．AddItem"政治"
List1．AddItem"物理"
List1．AddItem"化学"
List1．AddItem"语文"
List1．AddItem"生物"
End Sub
A) 政治化学生物
B) 无显示
C) 英语物理语文
D) 生物
答案
参考答案：A
解析： 在窗体加载的时候，给列表框增加了6个选项。这6个选项保存在列表框List1的List属性数组中，该数组下标从0开始。单击Command1时，通过一个循环把List1．List数组中下标为奇数的数组元素中存放的选项连接在一起，并在Text1中显示出来。所以Text1中显示的文字为“政治化学生物”。