新浪博客

excel-vba应用示例之如何禁用用户窗体的关闭按钮

2009-11-17 15:04阅读:

如何禁用用户窗体的关闭按钮?
解答:
您可能不想用户在单击窗体右上角的X图标后关闭窗体,您可以在用户窗体代码模块中将UserForm_QueryClose过程的Cancel参数值设置为True,此时虽然X图标仍然存在,但当您单击它时已不起作用,因此可以防止用户通过单击该图标按钮来关闭用户窗体。例如,下面的示例提示用户只能通过单击用户窗体上的确定按钮来关闭该用户窗体。您可以在VBE编辑器中插入一个用户窗体,并在用户窗体上放置一个名为“Ok”的按钮,在用户窗体代码模块中输入下面的代码进行调试。
‘**************************************************
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
‘CloseMode
参数表明事件发生的原因
若其值等于vbFormControlMenu则意味着用户单击了X图标按钮
If CloseMode = vbFormControlMenu Then
MsgBox '请单击''确定''按钮关闭本窗体'
Cancel = True
End If
End Sub
‘**************************************************
Private Sub Ok_Click()
Unload UserForm1
End Sub

我的更多文章

下载客户端阅读体验更佳

APP专享