如何在VB中单击一个按钮弹出一个对话框并显示一段话,详细代码,谢谢

如题所述

第1个回答  推荐于2016-05-07
新建一个窗体,在窗体上添加一个命令按钮,然后在代码窗口中添加以下代码:
===============================================
Private Sub Command1_Click()
Const msg1 As String="请在这里输入你想显示的一段话!"
Const msg2 As String="这里是对话框要显示的标题."
MsgBox msg1,vbOkOnly,msg2 '此处代码一定不能添加()
End Sub
===============================================
记住,1楼的代码会出现编译错误,在不需要返回值的时候就不能添加(),而在需要返回值的时候就一定要添加().本回答被提问者采纳
第2个回答  2009-03-28
Private Sub CommandButton1_Click()
MsgBox ("OK?")

End Sub
相似回答