Question

Vb6.0列表框问题

在窗体上画一个列表框,然后编如下两事件过程:
Private Sub Form_Click()
List1.RemoveItem 1
List1.RemoveItem 3
List1.RemoveItem 2
End Sub

Private Sub Form_Load()
List1.AddItem "ItemA"
List1.AddItem "ItemB"
List1.AddItem "ItemC"
List1.AddItem "ItemD"
List1.AddItem "ItemE"
End Sub
运行上面程序，然后单击窗体，列表框中所显示的项目为______
答案和具体的解释
谢谢啦¤

Answer 1

很简单的问题
Private Sub Form_Load()
List1.AddItem "ItemA"
List1.AddItem "ItemB"
List1.AddItem "ItemC"
List1.AddItem "ItemD"
List1.AddItem "ItemE"
End Sub
以上这段代码的意思是：程序运行起来就给List1列表框中添加内容
Private Sub Form_Click()
List1.RemoveItem 1
List1.RemoveItem 3
List1.RemoveItem 2
End Sub
点击窗体的时候
列表框中所显示的项目为
ItemA
ItemC
为什么会显示两个呢，我们看代码
第一个执行的表达式是 List1.RemoveItem 1
这行代码就是删除 索引好为 1 的一项内容，大家都知道List1的索引是从0开始的，先分析索引如下
"ItemA" 索引为 0
"ItemB" 索引为 1
"ItemC" 索引为 2
"ItemD" 索引为 3
"ItemE" 索引为 4
而执行完第一行代码 List1.RemoveItem 1 时，程序就删除 List1.AddItem "ItemB"
现在只剩
"ItemA" 索引为 0
"ItemC" 索引为 1
"ItemD" 索引为 2
"ItemE" 索引为 3
看到了吗，索引值就发生了变化，当程序执行第二行代码List1.RemoveItem 3 时，就删除的是 List1.AddItem "ItemE"
现在只剩
"ItemA" 索引为 0
"ItemC" 索引为 1
"ItemD" 索引为 2
执行第三行代码List1.RemoveItem 2 时 List1.AddItem "ItemD"
最后只显示
"ItemA"
"ItemC"
够详细的了吧？