admin 管理员组

文章数量: 887021


2023年12月19日发(作者：ajax的流程)

MsgBox函数

MsgBox函数的作用是弹出一个对话框，在其中显示的指定的数据和提示信息。此外，该函数还可以返回用户在此对话框做的选择，并将返回值赋给指定变量。

语法格式：

变量=MsgBox（信息内容，对话框类型+图标类型，对话框标题）

dim a

a = MsgBox ("输入密码错！" , 5+48+0 , "验证密码" )

信息窗如下页图

button参数的取值

名称

VbOKOnly

VbOkCancel

值

0

1

功能

确定按钮

确定和取消按钮

终止,重试和忽略按VbAortRetryIgnore 2

钮

VbYesNoCancel

VbYesNo

Vbretrycancel

VbCritical

VbQuestion

VbExclamation

3

4

5

16

32

48

是,否和取消按钮

是,否按钮

重试和取消按钮

停止图标

问号(?)图标

感叹号(!)图标

图标样式

按钮类型

3个数值表示

VbInformation 64

信息图标

默认按钮为第一按VbDefaultButton1 0

钮

默认按钮为第二按VbDefaultButton2 256

钮

默认按钮为第三按VbDefaultButton3 512

钮

MsgBox()的返回值

返回值

1

2

3

4

5

6

7

常量

vbOK

按钮

确定按钮

默认按钮

vbCancel

取消按钮

vbAbort

vbRetry

终止按纽

重试按钮

vbIgnore

忽略按钮

vbYes

vbNo

是

否

事件过程：

Private Sub 确定_Click()

Dim a

a = MsgBox("输入密码错！", 5 + 48 + 0, "验证密码")

End Sub


本文标签： 对话框 图标 按钮

版权声明：本文标题：MsgBox函数-举例说明使用方法 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.freenas.com.cn/free/1702962341h437564.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。