vb中如何将MsgBoX函数返回值输出到窗体上
返回值
常数 值 描述
vbOK 1 OK
vbCancel 2 Cancel
vbAbort 3 Abort
vbRetry 4 Retry
vbIgnore 5 Ignore
vbYes 6 Yes
vbNo 7 No
textbox1.text=msgbox（......）
或 form1.text=msgbox（......）
或
Dim g As Graphics = Me.CreateGraphics()
'Graphics 对象的 DrawString 方法替换 Visual Basic 6.0 的 Print 方法。Print 方法只使用一个 Text 参数，而 DrawString 还需使用指定下列各项的参数：Font、用于指定 Color 对象的 Brush 对象以及绘制文本的起始坐标。
g.DrawString(MsgBox（。。。。）, Me.Font, Brushes.Black, 0, 0)
'释放与 Graphics 对象关联的内存资源。
g.Dispose()
VB 类似 MsgBox 的输入框函数是啥？
VB类似MsgBox的输入框函数是InputBox 函数。InputBox 函数，在一对话框来中显示提示，等待用户输入正文或按下按钮，并返回包含文本框内容的 String。InputBox 函数示例：本示例说明使用 InputBox 函数来显示用户输入数据的不同用法。如果省略 x 及 y 坐标值，则会自动将对话框放置在两个坐标的正中。如果用户单击“确定”按钮或按下“ENTER”按键，则变量 MyValue 保存用户输入的数据。如果用户单击“取消”按钮，则返回一零长度字符串。Dim Message, Title, Default, MyValueMessage = "Enter a value between 1 and 3" ' 设置提示信息。Title = "InputBox Demo" ' 设置标题。Default = "1" ' 设置缺省值。' 显示信息、标题及缺省值。MyValue = InputBox(Message, Title, Default)' 使用帮助文件及上下文。“帮助”按钮便会自动出现。MyValue = InputBox(Message, Title, , , , "DEMO.HLP", 10)' 在 100, 100 的位置显示对话框。MyValue = InputBox(Message, Title, Default, 100, 100)
怎么显示vb msgbox 返回值
可以将语句放入一个事件中，比如放入按钮的单击事件，如下：
Private Sub Command1_Click()
MsgBox "你好", 3 + 48 + 0, "你惨了"
End Sub
运行（F5） 单击按钮 就可以弹出对话框。
如果要得到 弹出消息中 单击的是哪个按钮 （确定，取消等）
可以把MsgBox 赋值给一个整型变量
Private Sub Command1_Click()
a = MsgBox("你好", 3 + 48 + 0, "你惨了")
End Sub
也可以弹出，
MsgBox介绍及用法等见：http://baike.baidu.com/view/563674.htm#2
返回值 用于MsgBox函数返回值的常量 常数值 说明 vbOK 1 确定 vbCancel 2 取消 vbAbort 3 终止 vbRetry 4 重试 vbIgnore 5 忽略 vbYes 6 是 vbNo 7 否
