Question

VB中 msgbox后面加一个'16是什么意思啊

Answer 1

VB6.0中MsgBox函数使用中buttons参数加个16是显示 Critical Message（关键信息） 图标。

MsgBox 函数，在对话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击哪一个按钮。

第一组值 (0–5) 描述了对话框中显示的按钮的类型与数目；第二组值 (16, 32, 48, 64) 描述了图标的样式；第三组值 (0, 256,
512) 说明哪一个按钮是缺省值；而第四组值 (0, 4096) 则决定消息框的强制返回性。将这些数字相加以生成 buttons 参数值的时候，只能由每组值取用一个数字。

注意 这些常数都是
Visual Basic for Applications (VBA) 指定的。结果，可以在程序代码中到处使用这些常数名称，而不必使用实际数值。

Answer 2

你们好纠结

Answer 3

楼主好纠结...
你拿龙lingfeng的代码一试不就晓得了..

Answer 4

vbCritical 16 显示临界消息图标。

MsgBox 常数
下列常数与 MsgBox 函数一起使用，标识在消息框中出现的按钮、图标，并指定默认按钮。另外，还可以指定消息框的样式。因为这些常数在VBScript中被建立，您在使用之前不必定义它们。您可在代码中任意处使用它们以表示说明值。
常数 值 描述
vbOKOnly 0 只显示确定按钮。
vbOKCancel 1 显示确定和取消按钮。
vbAbortRetryIgnore 2 显示终止、重试和忽略按钮。
vbYesNoCancel 3 显示是、否和取消按钮。
vbYesNo 4 显示是和否按钮。
vbRetryCancel 5 显示重试和取消按钮。
vbCritical 16 显示临界消息图标。
vbQuestion 32 显示警告询问图标。
vbExclamation 48 显示警告消息图标。
vbInformation 64 显示提示消息图标。
vbDefaultButton1 0 第一个按钮是默认按钮。
vbDefaultButton2 256 第二个按钮是默认按钮。
vbDefaultButton3 512 第三个按钮是默认按钮。
vbDefaultButton4 768 第四个按钮是默认按钮。
vbApplicationModal 0 应用程序模式。用户必须响应消息框，才能继续在当前应用程序中工作。
vbSystemModal 4096 系统模式。 在 Win16 系统中， 所有应用程序都将中止直到用户响应消息框。 在 Win32 系统中， 此常数提供一个应用程序模式信息框并总是保留在您可能正在运行的所有其它程序的顶部。

下列常数与 MsgBox 函数一起使用，标识用户选定的按钮。仅当类型库中包含以下常数定义，且在您的工程文件中已经显式引用该类型库后，才允许使用这些常数。对于 VBScript，必须在代码中显式声明这些常数。
常数 值 描述
vbOK 1 确定按钮被单击。
vbCancel 2 取消按钮被单击。
vbAbort 3 终止按钮被单击。
vbRetry 4 重试按钮被单击。
vbIgnore 5 忽略按钮被单击。
vbYes 6 是按钮被单击。
vbNo 7 否按钮被单击。

追问

不太懂

追答

msgbox "test",16
16表示 显示临界消息图标。
msgbox “test”,1+16+256+4096
表示显示确定和取消按钮，显示临界消息图标，第二个按钮为默认（取消按钮），系统模式
或者：
msgbox "test",4369

追问

问个问题啊，我用msgbox,1 不是有确定和取消2个按钮吗，但是确定取消2个按钮都是会执行文件，呜呜呜，怎么让取消按钮见效？

追答

if msgbox("") = vbCancel Then
'点击取消按钮执行的操作
else
'点击确定按钮执行的操作
end if

或者

if msgbox("") = vbCancel Then exit sub

if msgbox("") = vbOk Then
'点击确定按钮的操作
end if

追问

点击取消返回原页面，没有操作怎么办

追答

贴上你的代码？