excel－vba应用示例之如何禁用用户窗体的关闭按钮_风子

http://blog.sina.com.cn/u/1391614214

首页博文目录关于我

个人资料

微博

加好友发纸条

写留言加关注

博客等级：
博客积分：

博客访问：
关注人气：
获赠金笔：0支
赠出金笔：0支
荣誉徽章：

正文字体大小：大中小

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

(2009-11-17 15:04:42)

标签：

杂谈

分类：计算机经验

如何禁用用户窗体的关闭按钮？
解答：您可能不想用户在单击窗体右上角的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

阅读┊ 收藏 ┊ 喜欢 ▼ ┊打印┊举报/Report

前一篇：宏操作sql server 2000

后一篇：Excel VBA语句集300

新浪BLOG意见反馈留言板　欢迎批评指正