VB中如何停止运行

Question

我在代码中用IF 语句写如果成功就运行下去如果不成功就停止（就是代码不向下运行）这个功能的代码要怎么写呢

Answer 1

用"End"强制程序结束运行，给出一段程序：
Private Sub Command1_Click()
Dim a As Integer,b As Integer
a=Val(Text1.Text)
b=Val(Text2.Text)
Text3.Text=a+b
End Sub
在这段VB程序中，VB一直执行语句，直到最后一句结束语句”End Sub“，才结束程序运行。

Answer 2

这要看你用在哪里，如果是事件中，使用 Else Exit Sub；如果是函数中，使用 Else Exit Function；如果是循环中，使用 Else Exit For（Do），等等。

Answer 3

if ... then
...
else
exit sub
end if

Answer 4

您好楼主 代码如下：Private Sub Command1_Click()
Dim a As Integer
a = 0
If a = 0 Then
MsgBox ""
Else
End
End If
MsgBox "11"
End Sub