Dim i As Integer
For i = 1 To 6
List1.AddItem i
Next i
For i = 1 To 3
List1.RemoveItem i
Next i
答案为什么是 135 而不是156
简单的VB问题
答案:2 悬赏:10
解决时间 2021-03-03 12:53
- 提问者网友:小姐请专情
- 2021-03-02 17:23
最佳答案
- 二级知识专家网友:為→妳鎖鈊
- 2021-03-02 18:55
For i = 1 To 6
List1.AddItem i
Next i上边的过程添加了元素,依次为1,2,3,4,5,6
在移除元素
For i = 1 To 3
List1.RemoveItem i
Next i的过程中,i从1变化成3,一步一步来看
i=1时,移除元素(1),列表中元素为1,2,3,4,5,6,此时元素(1)=2,移除后列表中元素为1,3,4,5,6
i=2时,移除元素(2),列表中元素为1,3,4,5,6,此时元素(2)=4,移除后列表中元素为1,3,5,6
i=3时,移除元素(3),列表中元素为1,3,5,6,此时元素(3)=6,移除后列表中元素为1,3,5
For每次循环只执行一次List.RemoveItem,而不是一下移除三个元素
明白没?
List1.AddItem i
Next i上边的过程添加了元素,依次为1,2,3,4,5,6
在移除元素
For i = 1 To 3
List1.RemoveItem i
Next i的过程中,i从1变化成3,一步一步来看
i=1时,移除元素(1),列表中元素为1,2,3,4,5,6,此时元素(1)=2,移除后列表中元素为1,3,4,5,6
i=2时,移除元素(2),列表中元素为1,3,4,5,6,此时元素(2)=4,移除后列表中元素为1,3,5,6
i=3时,移除元素(3),列表中元素为1,3,5,6,此时元素(3)=6,移除后列表中元素为1,3,5
For每次循环只执行一次List.RemoveItem,而不是一下移除三个元素
明白没?
全部回答
- 1楼网友:我的任性你不懂
- 2021-03-02 20:31
private sub command1_click()
a = text1.text
b = text2.text
label1.label = val(text1.text) + val(text2.text)
end sub
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯