Outlook VBA教程:BeforeMaximize事件

当用户最大化浏览器或检查器时发生。该事件在开始后可以取消。

Private Sub expression_BeforeMaximize(Cancel As Boolean)

expression  该表达式返回“应用于”列表中的一个对象,该对象在类模块中以事件形式声明。

Cancel  必选,Boolean 类型。当事件发生时为 False。如果事件过程将此参数设为 True,将不完成该操作,并且不将浏览器或检查器最大化。

VBA示例

以下示例在将当前窗口最大化前向用户弹出一条警告消息。如果用户单击“是”,则将浏览器最大化。


Private Sub objExplorer_BeforeMaximize(Cancel As Boolean)
'Prompts the user before maximizing the explorer
    Dim lngAns As Long
    lngAns = MsgBox("Are you sure you want to maximize the current window?", vbYesNo)
    If lngAns = vbYes Then
        Cancel = False
    Else
        Cancel = True
    End If
End Sub

上页:Outlook VBA教程:BeforeItemPaste事件 下页:Outlook VBA教程:BeforeMinimize事件

Outlook VBA教程:BeforeMaximize事件:相关链接

Outlook VBA教程:BeforeMinimize事件 Outlook VBA教程:BeforeMove事件
Outlook VBA教程:BeforeNavigate事件 Outlook VBA教程:BeforeReminderShow事件
Outlook VBA教程:BeforeShortcutAdd事件 Outlook VBA教程:BeforeShortcutRemove事件
Outlook VBA教程:BeforeSize事件 Outlook VBA教程:BeforeViewSwitch事件
Outlook VBA教程:Close事件 Outlook VBA教程:CustomAction事件
Outlook VBA教程:CustomPropertyChange事件 Outlook VBA教程:Deactivate事件
Outlook VBA教程:FolderAdd事件 Outlook VBA教程:FolderChange事件
Outlook VBA教程:FolderRemove事件 Outlook VBA教程:FolderSwitch事件
Outlook VBA教程:Forward事件 Outlook VBA教程:GroupAdd事件
Outlook VBA教程:ItemAdd事件 Outlook VBA教程:ItemChange事件
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号