请问：关于ＭＳＧＢＯＸ

Question

要显示的时候　　在消息框里一个按纽都没有　　怎么设置啊？

Answer 1

HO~~~~~~~~~~~~`HO~~~~~~~~~~~~`了解～～～～～～～～～　　谢谢呀～～～～～～～～～｀　　＾＆＾

Answer 2

msgbox"要显示的内容",0, "标题"

Answer 3

恩， 自己做个form.然后 vbmodal方式调用

Answer 4

Private Sub Command1_Click()
Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to continue ?"   ' 定义信息。
Style = 2 ' 定义按钮。
Title = "MsgBox Demonstration"   ' 定义标题。
Help = "DEMO.HLP"   ' 定义帮助文件。
Ctxt = 1000   ' 定义标题
      ' 上下文。
      ' 显示信息。
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then   ' 用户按下“是”。
   MyString = "Yes"   ' 完成某操作。
Else   ' 用户按下“否”。
   MyString = "No"   ' 完成某操作。
End If
End Sub
上述代码中Style的值定义按钮：
有下列设置值：常数               值   描述 
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 按钮。 
VbCritical        16 显示 Critical Message 图标。 
VbQuestion        32 显示 Warning Query 图标。 
VbExclamation     48 显示 Warning Message 图标。 
VbInformation     64 显示 Information Message 图标。 
vbDefaultButton1   0 第一个按钮是缺省值。 
vbDefaultButton2 256 第二个按钮是缺省值。 
vbDefaultButton3 512 第三个按钮是缺省值。 
vbDefaultButton4 768 第四个按钮是缺省值。
以上均引自MSDN。