求解 vba， 为什么每次都运行“你好”，我已经加了if判断，怎么修改请指教

ry415212

Sub text()
Do
i = i + 1
If i = 5 Then
    GoTo 100
End If
MsgBox i
100: MsgBox "你好"
Loop
End Sub

user湫

你这标记都在do循环里面肯定会总弹出来呀 100只是标签 还是会运行的 一般结合exit sub用更方便

user湫

1. 
   
2. Sub text()
   
3.     Do
   
4.         i = i + 1
   
5.         If i = 5 Then
   
6.             GoTo 100
   
7.         End If
   
8.         MsgBox i
   
9.         
   
10.     Loop
    
11.    
    
12.     Exit Sub
    
13. 100: MsgBox "你好"
    
14. End Sub
    
15. 
    

复制代码

ry415212

user湫 发表于 2023-7-29 14:05

谢谢，但是要是那样的话程序到5就终止了，不能继续无限循环到6啊，我想让程序继续下去，只不过到5时显示“你好”

user湫

ry415212 发表于 2023-7-29 14:35
谢谢，但是要是那样的话程序到5就终止了，不能继续无限循环到6啊，我想让程序继续下去，只不过到5时显示 ...

那就不要goto呀 直接写if判断就好

ry415212

user湫 发表于 2023-7-29 19:43
那就不要goto呀 直接写if判断就好

谢谢，if我明白，我在尝试goto