[已解决]如何遇到特殊值跳过循环

向前650809

各位网友好，有时根据情况，在循环程序中，有特殊情况要求不执行语句
如for i=1 to 100
执行语句
next i
但对某不i值如m，要求不执行语句，执行下一个i值。请问程序代码如何写出，谢谢

最佳答案

月排行榜 / 总排行榜

liuts

2011-4-9 20:23

1. Sub aa()
   
2. m = 5
   
3. For i = 1 To 8
   
4. 
   
5. If i = m Then
   
6. GoTo 100
   
7. Else
   
8. MsgBox 111
   
9. j = j + 1
   
10. End If
    
11. 100: Next
    
12. MsgBox j
    
13. End Sub
    

复制代码

跳转到最佳答案楼层

liuts

for i=1 to 100
if i=m then goto 100
执行语句
100:
next i

liuts

1. Sub aa()
   
2. m = 5
   
3. For i = 1 To 8
   
4. 
   
5. If i = m Then
   
6. GoTo 100
   
7. Else
   
8. MsgBox 111
   
9. j = j + 1
   
10. End If
    
11. 100: Next
    
12. MsgBox j
    
13. End Sub
    

复制代码

hhczxe

不错                                                   
值得学习一下