vb中，单击按钮，结束程序执行的代码是什么

Private Sub UserForm_Terminate()

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

End Sub

扩展资料

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

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

举例来讲，比如通过Command1、2、3，分别来显示Text1，清除Text1文本和窗体打印，结束代码，如下：

Private Sub Form_Load()

Text1.Visible = False 'Text1隐藏

End Sub

Private Sub Command1_Click()

Text1.Visible = True 'Text1显示

End Sub

Private Sub Command2_Click()

Text1.Text = "" 'Text1文本清除

Form1.Cls'Form1打印内容清除

End Sub

Private Sub Command3_Click()

End '结束代码

End Sub

那复杂啦

如果是一个程序结束代码是

public

sub

form_unload()

unload

me

end

end

sub

---