[已解决]请教，为什么这个循环的变量会比我预计的结果大1 。

hrpotter

本身就加了1，再加一个next,就相当于+2,这样step就是2了

hrpotter

用这个就知道你循环了多少次了，不是101次，还是51次

1. Sub 循环语句增加变量数值()
   
2. 
   
3.     Dim i As Integer, a As Integer
   
4.     For i = 0 To 100
   
5.     i = i + 1
   
6.     a = a + 1
   
7.     Next
   
8.     MsgBox a
   
9. End Sub

复制代码

爱疯

Sub a()
    Dim i As Integer
    For i = 0 To 2
        i = i + 1
'        MsgBox i
    Next
    MsgBox i
End Sub


Sub b()
    Dim i
    i = i + 1
    i = i + 1    '相当于next i
    i = i + 1
    i = i + 1    '相当于next i
    MsgBox i
End Sub

无聊的疯子

用两个简单的代码来看问题

1. 
   
2. Sub c()
   
3. Dim X As Integer
   
4.   For X = 1 To 1
   
5.   Next
   
6.   MsgBox X
   
7. End Sub
   
8. 
   
9. Sub cc()
   
10. Dim X As Integer
    
11.   For X = 1 To 2
    
12.     X = X + 1
    
13.   Next
    
14.   MsgBox X
    
15. End Sub
    
16. 
    
17. Sub ccC()
    
18. Dim X As Integer
    
19.   For X = 1 To 2 Step 2
    
20.   Next
    
21.   MsgBox X
    
22. End Sub
    

复制代码

过程 C 循环是1 到 1 自然只会循环1 次,
因为 这种循环在 next 处是自动
累加步长的(省略了 step 则步长是1)

所以C过程最后的 x是 2

而 过程 CC 则 和 过程 CCC 是一样的了,
只是 CC 把步长写在了循环内部,即x=x+1

而 CCC 则是在循环开始的时候设置的步长,

所以最后 他们的值都是 3

tjlaoji

不建议在循环体内改变循环变量的值