UC知道VB二级for循环
来源：百度知道 编辑：UC知道 时间：2024/07/08 13:33:58
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编
写如下事件过程：
Private Sub Command1_Click()
Dim i As Integer, n As Integer
For i = 1 To 50
i = i + 3
n = n + 1
If i > 10 Then Exit For
Next
Text1.Text = Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是
请高手逐步分析。谢谢
i为什么取1，5，9呢
遇到next,i就要加1吗
写如下事件过程：
Private Sub Command1_Click()
Dim i As Integer, n As Integer
For i = 1 To 50
i = i + 3
n = n + 1
If i > 10 Then Exit For
Next
Text1.Text = Str(n)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是
请高手逐步分析。谢谢
i为什么取1，5，9呢
遇到next,i就要加1吗
二次补充：是的。遇到Next，循环变量就要自增。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
答案补充：呵呵，看来你还是没有领会下面这句话的含义。我把刚才的答案做了点补充，你再看看。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
逐步分析如下。提醒你一定要注意，Next语句的功能只是简单的把循环变量（这个题是i）＋1。这样你就好理解了。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
i = 0
n = 0
i = 1 （因为遇到了For i＝1）
i = i + 3 = 1 + 3 = 4
n = n + 1 = 0 + 1 = 1
(i不>10，遇到Next，i＝i＋1＝4＋1＝5)
i = i + 3 = 5 + 3 = 8
n = n + 1 = 1 + 1 = 2
(i不>10，遇到Next,i＝i＋1＝8＋1＝9)
i = i + 3 = 9 + 3 = 12
n = n + 1 = 2 + 1 = 3
(i>10,exit for)
Text1.Text = Str(n) = Str(3) = "3"
这回明白了么？
i=14 先是 i=1 小于50 然后+3=4 小于10 然后+1=5，小于50 然后+3=8 小于10 然后+1=9 小于50 然后+3 =12 大于10 跳出
问题太简单了，不回答