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 第四个按钮是缺省值。
vbApplicationModal 0 应用程序强制返回；应用程序一直被挂起，直到用户对消息框作出响应才继续工作。
vbSystemModal 4096 系统强制返回；全部应用程序都被挂起，直到用户对消息框作出响应才继续工作。
vbMsgBoxHelpButton 16384 将Help按钮添加到消息框
VbMsgBoxSetForeground 65536 指定消息框窗口作为前景窗口
vbMsgBoxRight 524288 文本为右对齐
vbMsgBoxRtlReading 1048576 指定文本应为在希伯来和阿拉伯语系统中的从右到左显示
返回值
常数 值 描述
vbOK 1 OK
vbCancel 2 Cancel
vbAbort 3 Abort
vbRetry 4 Retry
vbIgnore 5 Ignore
vbYes 6 Yes
vbNo 7 No
试试吧 这些是具体的设置
按钮那里用后面的值：0 只有确定 1确定和取消 2终止 重试 忽略 3…… 4^……5……
自己试下
MsgBox Textbox1.Text ,vbOKCancel,"提示"
如何用vb实现一个弹出对话框?
+0，或不加，表示弹出的对话框上不带图标，+16，附带错误图标，需要向用户提示错误信息时使用，+32，附带问号图标，需要向用户进行询问时可以使用，+48，附带叹号图标，需要向用户提示注意或警惕信息时使用，+64，附带信息图标，需要向用户弹出一些正常信息时使用。代码如下：Sub shishi()Dim tf As Bool...
在VB中怎么用代码弹出输入对话框
1、首先打开VB软件。2、双击要编写代码的窗体或者控件，就会弹出代码窗口。3、要编辑“确定”命令按钮的编码，可以双击“确定”命令按钮。4、鼠标右击窗体或者控件，在弹出页面中选择“查看代码”。5、点击“视图”，在“视图”页面中，选择“代码窗口”。6、在工程资源管理器窗口中点击“查看代码”按钮。
在VB中怎么用代码弹出输入对话框
1、首先，打开“易语言”，然后选择“Windows窗口程序”选项，如下图所示，然后进入下一步。2、其次，完成上述步骤后，将编辑框、按钮和常用对话框从基本组件栏拖放到程序中，如下图所示，然后进入下一步。3、接着，完成上述步骤后，单击以选中“通用对话框”，然后在左侧的属性列中看到“过滤器”。根...
VB如何编写简单弹出对话框的代码?
QueDing = MsgBox("你真的确定要退出本程序吗?", vbYesNo + vbQuestion, "关闭窗口提示") If QueDing = vbYes Then End Else Cancel = 1 End IfEnd SubPrivate Sub Command1_Click() '点退出按钮退出 Form_QueryUnload 0, 0End Sub 热心网友| 发布于2013-08-22 举报| 评论 1 1 直接用MSGBOX函...
在VB中,怎样让它弹出对话框?
vbYes 6 Yes vbNo 7 No 说明 在提供了 helpfile 与 context 的时候，用户可以按 F1(Windows) or HELP (Macintosh) 来查看与 context 相应的帮助主题。像 Microsoft Excel 这样一些主应用程序也会在对话框中自动添加一个 Help 按钮。如果对话框显示 Cancel 按钮，则按下 ESC 键与单击 Cancel 按钮...
请问怎么用VB实现点击一个按钮弹出一个对话框
Private Sub Command1_Click()MsgBox "因为你长的不够帅，所以执行了非法操作， " + Chr(13) + " " + Chr(13) + "此程序即将关闭，" + Chr(10) + " " + Chr(13) + "如果有问题，请与供应商联系。", 19, "系统信息"End Sub ...
VB如何设置弹出对话框
先把控件添加 caption属性设置好 如果你要每个单选按钮单机都会弹出这个对话框的话 这样写 弹出的内容可以根据自己需要修改 Private Sub Option1_Click()MsgBox "答对一半,5分",,"bingo!"End Sub Private Sub Option2_Click()MsgBox "答对一半,5分",,"bingo!"End Sub Private Sub Option3_Click()...
vb中输入对话框怎么设置
InputBox函数，功能是弹出一个对话框，在其中显示提示，等待用户输入文字并按下按钮，然后返回用户输入的文字。示例：Text1 = InputBox("请在下面输入内容：", "输入框", "默认值")不输入，直接确定，会直接使用默认值。
如何用VBA实现弹出窗口
利用msgbox方法即可实现弹出，简单代码如下：Private Sub CommandButton1_Click()MsgBox("弹窗演示", vbInformation + vbOkOnly, "这是一个弹出")End Sub 关于此例中用到的Msgbox的相关知识：1、作用 在消息框中显示信息，并等待用户单击按钮，可返回单击的按钮值(比如“确定”或者“取消”)。通常用作...
VB如何实现执行某程序,弹出对话框选择是否要执行,点击是则执行,否则...
这个就会弹出一个对话框,VbOKCancel决定了这个对话框有个确定按钮,有个取消按钮还有下面这些可以选择vbOKOnly 0 只显示“确定”按钮VbOKCancel 1 显示“确定”和“取消”按钮VbAbortRetryIgnore 2 显示“终止”、“重试”和“忽略” 按钮VbYesNoCancel 3 显示“是”、“否”和“取消”按钮VbYesNo 4 显示“是”和...
