中科新闻网美国大学商业分析专业:以下这个程序为什么结果是35？
来源：百度文库 编辑：中科新闻网 时间：2024/04/30 23:33:06
Private Sub Command2_Click()
Dim a(-1 To 5) As Boolean
Dim flag As Boolean
Dim i As Integer
Dim j As Integer
flag = False
'将下面Do嵌套调整成锯齿形；
'用逐语句调试观察程序执行情况，并推出最后变量j的值
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 i
Loop
Print j
End Sub
问 j=?
Dim a(-1 To 5) As Boolean
Dim flag As Boolean
Dim i As Integer
Dim j As Integer
flag = False
'将下面Do嵌套调整成锯齿形；
'用逐语句调试观察程序执行情况，并推出最后变量j的值
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 i
Loop
Print j
End Sub
问 j=?
你只要跟着运行一下就知道是怎么回事了，不知道你什么地方不明白啊。
vb看着费劲