vb初学者的循环问题

来源：百度知道编辑：UC知道时间：2024/09/24 14:18:27

Private Sub cmddisplay_Click()
'清除列表中的所有项
List2.Clear

'如果某一项被选中，则将它加入到list1
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then
List2.AddItem List1.List(i)
End If
Next i
End Sub

Private Sub cmdexit_Click()
End
End Sub

Private Sub Form_Load()
'用屏幕字体名字填充列表框
For i = 0 To Screen.FontCount - 1
List1.AddItem Screen.Fonts(i)
Next i
End Sub

这里的的“i”可以随便更换成任意字母吗？
Screen.FontCount - 1这里的“-1”可以是“-（任意数字吗）或者0？”
“0”也可以换成别的数字吗？

这里的的“i”可以随便更换成任意字母,但for循环内的i都得跟着换。
Screen.FontCount - 1这里的“-1”不可以是任意数字，Screen.FontCount为字体的总数，如果Screen.FontCount=100的话就是说有100种字体，但其标号是0-99，所以只能是 for i=0 to 100-1。如果换成 for i=0 to 100则会出问题，因为没有标号为100的字体，即没有第101种字体。

i是变量名，可以随便改，但要改就得全改，所有的i都要改成一样的

Screen.FontCount - 1是全部字体的序号，这个不能改

i可是换成其他字母
-1是减1的意思，不可以换成其他数字
第一个循环的次数是list1里的子项的个数，因为i从0开始，而List1.ListCount代表list1里的子项个数，所以要减去1，才用到-1

VB循环的问题 Vb初学者的问题 VB初学者的问题: VB的for循环问题 VB循环次数的问题简单的VB循环问题 vb循环语句的问题 VB~~For循环的问题一个VB初学者的问题 VB初学者的小问题