在窗体中点击命令按钮结束整个程序

试了一下，在“取消”按钮的程序里面加上End就可以实现我想要的功能。不需要在sub test里面加上If语句：

Private Sub CommandButton1_Click() '取消
UserForm1.Hide
End                 '在这里加上End，就可以直接退出后面的程序
End Sub
-------------------------------------------------------------
Sub test()
UserForm1.Show
'   ……
End Sub