UC知道VB初级理解问题！
来源：百度知道 编辑：UC知道 时间：2024/06/04 01:10:51
Private Sub Form_Click()
Dim p As Integer, i As Integer, n As Integer
p = 2: n = 20
For i = 1 To n Step p
p = p + 2
n = n - 3
i = i + 1
If p >= 10 Then Exit For
Next i
Print i, p, n
End Sub
不明白
循环第一部的时候
i=1
i=i+1(2) n=n-3(17) p=p+2(4)
如此类推：
结果分别为
i p n
2 4 17
5 6 14 不明白这部 5 6 14 的结果是怎么得来的？
Dim p As Integer, i As Integer, n As Integer
p = 2: n = 20
For i = 1 To n Step p
p = p + 2
n = n - 3
i = i + 1
If p >= 10 Then Exit For
Next i
Print i, p, n
End Sub
不明白
循环第一部的时候
i=1
i=i+1(2) n=n-3(17) p=p+2(4)
如此类推：
结果分别为
i p n
2 4 17
5 6 14 不明白这部 5 6 14 的结果是怎么得来的？
以下是整个执行过程：
p= 2 n= 20
开始循环 i = 1 To 20 Step 2
循环新一轮
>循环中> i= 1
>循环中> p=p+2= 4
>循环中> n=n-3= 17
>循环中> i=i+1= 2
>If p>=10 (p= 4 )不成立
循环新一轮
>循环中> i= 4
>循环中> p=p+2= 6
>循环中> n=n-3= 14
>循环中> i=i+1= 5
>If p>=10 (p= 6 )不成立
循环新一轮
>循环中> i= 7
>循环中> p=p+2= 8
>循环中> n=n-3= 11
>循环中> i=i+1= 8
>If p>=10 (p= 8 )不成立
循环新一轮
>循环中> i= 10
>循环中> p=p+2= 10
>循环中> n=n-3= 8
>循环中> i=i+1= 11
>If p>=10 (p= 10 )成立 >退出循环
循环退出
输出内容
循环一次打印一次结果 5 6 14 是第二次循环 要等到 P》=10才退出循环