VB中如何停止运行

用"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“，才结束程序运行。

Private Sub UserForm_Terminate()

Unload frmSub '退出当前窗体前先关闭子窗体

End Sub

扩展资料

在次代码运行的过程中，我们按Esc或者<Ctrl+Break>组合键是没有效果的。如果我们在开发好的程序时候，可以加上这句代码即可完成。顺带说下这格语句的使用方法：

Application对象的EnableCancelKey属性控制将用户中断用于运行程序的处理，语法如下：expression.EnableCancelKey，参数是expression必需的，Application对象。

end是vb整个应用程序，所有代码停止，窗口卸载

exit是模块，可以是循环体，函数，过程 比如："exit sub"vb中还有窗体退出还有，unload xx, me.unload等 如果只有一个窗体也相当于退出程序

---