Question

帮我解释下这个程序（VB6）

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

Answer 1

步长为-1是指反向循环，例如9、8、7、6、5、4、3、2、1、0的循环就要设定Step -1以便于告诉计算机循环是是从最后一个开始，一个一个的向前循环。您的这个程序执行时会从列表最后一项开始向前，一项一项检查，检查到后删除该项，这就是步长为-1的原因，即，从最后一项开始，向前反向执行。希望对您有所帮助！