在窗体上建立一个名称为List1的列表框、一个名称为Text1文本框和一个名称为 Command1的命令按钮,如图20-12如示。 程序代码如下,如果在程序运行过程中单击命令按钮,则在文本框中显示的内容是( )。 Private Sub Co

admin2009-02-13  32

问题 在窗体上建立一个名称为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、生物

答案1

解析 在窗体加载的时候,给列表框增加了6个选项。这6个选项保存在列表框List1的List属性数组中,该数组下标从0开始。单击Command1时,通过一个循环把List1.List数组中下标为奇数的数组元素中存放的选项连接在一起,并在Text1中显示出来。所以Text1中显示的文字为“政治化学生物”。
转载请注明原文地址:https://kaotiyun.com/show/vI1p777K
0

最新回复(0)