怎么才能让VB代码不继续执行

来源:百度知道 编辑:UC知道 时间:2024/05/24 17:44:40
就是我判断他有的东西没填 给他一个提示 然后写什么代码让程序不继续走

退出过程 exit sub

一般一堆text数组,下边一个确定按钮
dim i as integer
for i = 0 to text.ubound
if text(i).text ="" then
msgbox "数据不全"
exit sub
end if
next

这下边是如果数据都正确的话执行的代码

用DO循环。比如你要判断TEXT1中是否有数据,没有就等着,有就继续往下走,就可以这样写:
Do while text1.text=""
doevent
loop

等着并不好。用Exit Sub退出事件过程,这样程序就进入闲置状态(Idle)了。

If Text1.text = "" then
Msgbox "有的东西没填!" ,vbinformation
Exit sub
End if

exit sub退出过程
exit for退出for循环
exit do 退出do循环
goto跳转到某标签

if 东西没填 then
msgbox "no"
else
程序继续的代码
end if