帮我解释下这个程序(VB6)

[复制链接]
查看11 | 回复1 | 2011-1-24 23:08:13 | 显示全部楼层 |阅读模式
Private Sub Command2_Click()

Dim i As Integer

For i = List1.ListCount - 1 To 0 Step -1

If List1.Selected(i)Then List1.RemoveItem i

'删除选中项目

Next i

End Sub

“For i = List1.ListCount - 1 To 0 Step -1”为什么不长会是-1

回复

使用道具 举报

千问 | 2011-1-24 23:08:13 | 显示全部楼层
步长为-1是指反向循环,例如9、8、7、6、5、4、3、2、1、0的循环就要设定Step -1以便于告诉计算机循环是是从最后一个开始,一个一个的向前循环。您的这个程序执行时会从列表最后一项开始向前,一项一项检查,检查到后删除该项,这就是步长为-1的原因,即,从最后一项开始,向前反向执行。希望对您有所帮助!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行