VBAWhileWend循环在Wend循环中，如果条件为True，则会执⾏所有语句，直到遇到Wend关键字。
如果条件为false，则退出循环，然后控件跳转到Wend关键字后⾯的下⼀个语句。
语法
while语句怎么退出以下是VBA中While..Wend循环的语法。
While condition(s)
[statements 1]
[statements 2]
...
[statements n]
Wend
流程图
⽰例
参考以下⽰例代码的实现 -
Private Sub Constant_demo_Click()
Dim Counter :  Counter = 10
While Counter < 15' Test value of Counter.
Counter = Counter + 1' Increment Counter.
msgbox"The Current Value of the Counter is : " & Counter
Wend  ' While loop exits if Counter Value becomes 15.
End Sub
当上⾯的代码被执⾏时，它会在消息框中打印以下内容。
The Current Value of the Counter is : 11
The Current Value of the Counter is : 12
The Current Value of the Counter is : 13
The Current Value of the Counter is : 14
The Current Value of the Counter is : 15

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。