UC知道求助 一个简单的VB题目！
来源：百度知道 编辑：UC知道 时间：2024/06/15 19:54:10
Dim a(-1 To 5) As Boolean
Dim flag As Boolean
flag = False
Dim i As Integer
Dim j As Integer
Do Until flag = True
For i = -1 To 5
j = j + 1
If a(i) = False Then
a(i) = True
Exit For
End If
If i = 5 Then
flag = True
End If
Next
Loop
Print j
Dim flag As Boolean
flag = False
Dim i As Integer
Dim j As Integer
Do Until flag = True
For i = -1 To 5
j = j + 1
If a(i) = False Then
a(i) = True
Exit For
End If
If i = 5 Then
flag = True
End If
Next
Loop
Print j
J的值为35
第1次I=-1 J加了1次
第2次I=-1和0 J加了2次
第3次I=-1、0和1 J加了3次
第4次I=-1、0、1和2 J加了4次
第5次I=-1、0、1、2和3 J加了5次
第6次I=-1、0、1、2、3和4 J加了6次
第7次I=-1、0、1、2、3、4和5 J加了7次
第8次I=-1、0、1、2、3、4和5 J也加了7次
全部次数加起来就是了1+2+3+4+5+6+7+7
这个就那个第7次的时候不要忘记a(5)一开始的值是false 要退出一次循环。。。所以还有第8次一样的一次
你想问什么？程序没有问题，运行结果是35。