盟威 Access 快速开发平台 \ 在线帮助中心 \ 函数目录 \ MsgBoxEx 函数

MsgBoxEx 函数

简介

MsgBox 函数的增强版。在对话框中显示消息,等待用户单击按钮,并返回一个长整数(Long)来确定用户单击了哪一个按钮。如果指定时间无响应则自动关闭并返回默认选择。

语法

MsgBox (Prompt[, Buttons][, Title][, Timeout])

输入参数

参数名称 必需/可选 数据类型 说明
Prompt 必需 Variant(String) 要显示在对话框中的消息内容。最大长度1024个字符,多余部分将被截掉。可以通过回车符(vbCr或Chr(13))、换行符(vbLf或Chr(10))、回车符+换行符(vbCrLf或Chr(13) & Chr(10))来进行强制换行。
Buttons 可选 VbMsgBoxStyle 指定消息对话框中要显示的按钮的个数及形式、图标样式、默认按钮是哪一个、消息框的强制回应模式等。可以是多个值的总合。如果省略此参数,则默认为0。
Title 可选 Variant(String) 在消息对话框标题栏中显示的内容。如果省略此参数,则默认根据图标类型显示为“错误”、“警告”、“提示”、“确认”,并在后面附加设置的软件名称。
Timeout 可选 Variant(Long) 如果对话框显示时间超过此时间用户未做出响应,对话框将自动关闭(以毫秒为单位)。如果省略此参数,当Buttons为vbOKOnly、vbInformation、vbExclamation时,默认为3000毫秒(即3秒),否则默认为0。

返回值

用户点击了“确定”按钮返回 vbOK 用户点击了“取消”按钮或关闭了对话框返回 vbCancel 用户点击了“是”按钮返回 vbYes 用户点击了“否”按钮返回 vbNo 用户点击了“中止”按钮返回 vbAbort 用户点击了“重试”按钮返回 vbRetry 用户点击了“忽略”按钮返回 vbIgnore

说明

在 MsgBox 的基础上,增加了自动根据图标类别自动显示标题、定时自动关闭消息框的功能。

示例

Sub Test()
    MsgBoxEx "这是一个消息框,它将在3秒后自动关闭。", vbInformation
End Sub

修订记录