一道简单VB题目

来源:百度知道 编辑:UC知道 时间:2024/05/28 03:52:01
Private Sub Form_Click()

For i = 1 To 6
Combo1.AddItem i
Next i
For i = 1 To 3
Combo1.RemoveItem i
Next i

End Sub

求运行结果。 书上的答案和我输入VB程序运行的不一样。

结果应该是1,3,5
For i = 1 To 6
Combo1.AddItem i
Next i
additem 方法形式是 addirem 内容(,index).index是选项的位置,可以省略.默认从0开始
所以,combo1里内容应该有1,2,3,4,5,6这是不用说了,对应的index 分别是0,1,2,3,4,5
然后For i = 1 To 3
Combo1.RemoveItem i
Next i
RemoveItem 的用法是 RemoveItem index
i=1时,combo1删除index为1的选项,就是2,然后combo1的内容为1,3,4,5,6,对应的index 分别是0,1,2,3,4
i=2,combo1删除index为2的选项,就是4,然后combo1的内容为1,3,5,6,对应的index 分别是0,1,2,3
i=3时,combo1删除index为3的选项,就是6
所以剩下1,3,5
搞不清楚你可以把
For i = 1 To 3
Combo1.RemoveItem i
Next i 改为
Combo1.RemoveItem 1
Combo1.RemoveItem 2
Combo1.RemoveItem 3
一句一句来试

那以你运行的结果为准。
正确的结果应该是,最后剩下:
1
3
5