意思不是很明白
是 MsgBox(prompt[, buttons] [, title] [, helpfile, context]) 中buttons的数据类型还是...?
buttons的数据类型是Integer
下列供参考
常数 值 描述
vbOKOnly 0 只显示 OK 按钮。
VbOKCancel 1 显示 OK 及 Cancel 按钮。
VbAbortRetryIgnore 2 显示 Abort、Retry 及 Ignore 按钮。
VbYesNoCancel 3 显示 Yes、No 及 Cancel 按钮。
VbYesNo 4 显示 Yes 及 No 按钮。
VbRetryCancel 5 显示 Retry 及 Cancel 按钮。
你问的这个类型名为:vbmsgboxstyle,你要是觉得不好,你还可以自定义一个枚举类(用PUBLIC ENUM XXXX
A=VBMSGBOXSTYLE.XXX
......
END ENUM
Public Function 更新提示(ByVal 提示信息 As String, ByVal 提示按钮 As VbMsgBoxStyle) As Boolean
MsgBox 提示信息, 提示按钮, "入库信息"
End Function
Private Sub Command1_Click()
更新提示 "123", vbOKOnly
End Sub