关于二级vb的题目

来源:百度知道 编辑:UC知道 时间:2024/06/23 12:23:25
Private Sub Command1_Click()
Dim i As Integer, n As Integer
For i = 0 To 50
i = i + 3
n = n + 1
If i > 10 Then Exit For
Next
Text1.Text = Str(n)
End Sub
文本框输入的是3,但我还不太清楚为什么,求大虾们给予详细的解答过程....麻烦啦....

for 循环里面
第一次:i=3( 0+3 ) n=1 (0+1)
第二次 i=7(上一循环i=3,循环一次+1 变为4,4+3=7 ) n=2 (1+1)
第三次 i=11(上一循环i=7,循环一次+1 变为8,8+3=11) n=3 (2+1)
此时,i=11 大于10 退出for循环

所以 n=3 即 Text1.Text = 3