office教程office教程

office办公学习网
office办公学习网(www.168361.com)是自己整理的一些文章,用于自己学习office使用,如果侵犯了您的版权,请联系我们删除。网站包含office/word/wps等使用技巧大全全集,office百科全书

5.2.3.7 Excel VBA窗体的QueryUnload事件

    即将要卸载窗体的时候,窗体对象就会收到一个伽eryUnload事件。通过检查
    UnloadMode参数可以了解窗体卸载的原因。以下是QueryUnloed事件处理过程的代码:
    Private Sub Form QueryUnload(Cancel As Integer, UnloadMode As Integer)
    Select Case UnloadMode
    Case vbFormControlMenu
    ,用户关闭窗体
    Case vbFormCode
    ,代码终止窗体
    Case vbAppWindows
    ,当前窗口进行正在终止
    Case vbAppTaskManager
    ,任务粉理器关闭程序
    Case vbFormMDlForm
    ,MDI父窗体关闭窗口
    Case vbFormOwner
    父窗体被关闭
    End Select
    End Sub
    当然,可以通过将Cancel参数设置为True拒绝卸载窗体:
    Private Sub Form QueryUnload(Cancel As Integer, UnloadMode As Integer)
    拒绝用户关闭窗口
    Select Case UnloadMode
    Case vbFormControlMenu,vbAppTaskManager
    Cancel一True
    End Select
    End Sub
    

本文链接:http://168361.com/excel/535.html

版权声明:内容均来源于互联网 如有侵权联系删除

最后编辑于:2015-09-05作者: excel教程

Excel2010中将编号加上固定的数值并保持固定位数
去除excel单元格左上角的绿色小三角