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对象。

1.VB的启动方式有两种

1

sub

main

2

form_load

结束也是两个方法，

sub

main

对应的执行到end

sub

就算结束

form_load就是Unload

me

当然全部结束的方法是END

但End

语句会重置所有模块级别变量和所有模块的静态局部变量。若要保留这些变量的值，改为使用

Stop

语句，则可以在保留这些变量值的基础上恢复执行。

注意

End

语句不调用

Unload、QueryUnload、或

Terminate

事件或任何其它

Visual

Basic

代码，只是生硬地终止代码执行。窗体和类模块中的

Unload、QueryUnload、和

Terminate

事件代码未被执行。类模块创建的对象被破坏，由

Open

语句打开的文件被关闭，并且释放程序所占用的内存。其它程序的对象引用无效。

End

语句提供了一种强迫中止程序的方法。Visual

Basic

程序正常结束应该卸载所有的窗体。只要没有其它程序引用该程序公共类模块创建的对象并无代码执行，程序将立即关闭。

---