电脑教程
位置:首页>> 电脑教程>> office教程>> 如何处理用户窗体右上角的X按钮?

如何处理用户窗体右上角的X按钮?

  发布时间:2022-07-31 02:24:46 

标签:excel常用函数,excel常见问题,excel技巧,Excel教程

Q经常有人会问,如何隐藏VBA用户窗体右上角的X关闭按钮?

A:使用API可以禁用或者移除用户窗体右上角的关闭按钮,但既然它已经存在,我们何不合理地利用它呢。

默认情况下,单击用户窗体右上角的X(关闭)按钮后,将卸载该用户窗体并从内存中清除。这样,其它代码将无法再与该用户窗体进行交互。此时,我们可以略微更改关闭按钮的功能,当用户单击该按钮时,隐藏用户窗体而不是彻底卸载它。

用户窗体模板如图1所示。

如何处理用户窗体右上角的X按钮?

图1

代码如下:

Private SubbtnOK_Click()

Me.Hide

End Sub

Private SubbtnCancel_Click()

Me.Hide

End Sub

Private SubUserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

If CloseMode = vbFormControlMenu Then

‘取消X按钮的默认行为

Cancel = True

Info

btnCancel_Click

End If

End Sub

Private SubInfo()

MsgBox “本用户窗体将被隐藏而不是被卸载,因此不会影响与本窗体相交互的代码.”

End Sub

0
投稿

猜你喜欢

手机版 电脑教程 asp之家 www.aspxhome.com