当前位置:首页 >> vBA 跳出whilE >>

vBA 跳出whilE

条件后跟exit do,请看样例: Do While i < 100 If i = 10 Then Exit Do i = i + 1 Loop

使用goto语句,例:如果符合条件跳到标签aaa while i=20 then goto aaa wend aaa: msgbox "i>=20"

While I

break 中断退出当前循环。 contine 继续接下来的循环。 return 返回,相当于退出循环。

VBA中没有continue和break,循环的终止通过exit do或exit for实现,范例如下: 1、for语句: s=0for i=1 to 100s=s+iif s>100 thenexit for '强制退出for循环end ifnext i 2、do语句: s=0do while trues=s+iif s>100 thenexit do '强制退出do...

Sub t1() Dim password As String: Dim x As Byte: Dim retry As Byte re: x = 1 Do While x < 5 password = InputBox("输入密码", "输入密码") If password = "a" Then MsgBox "欢迎登陆", vbOKOnly + vbInformation Exit Do Else MsgBox "第 "...


你想实现的功能有的类似计时器,建议用计时器 Timer1 吧

是后一个if 少 end if 引起

1、For ……Next 语句,适用于顺序操作 例1.在立即窗口输出1到100 For n=1 to 100 '从1到100 ,执行下行代码 debug.Print n next n 2、For……Each……Next语句,适用于集合的操作 例2.输出指定单元格区域所有单元格的内容 For Each Cell in myRange '...

网站首页 | 网站地图
All rights reserved Powered by
copyright ©right 2010-2021。