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

2024-11-08 06:42:22
推荐回答(2个)
回答1:

新建一个窗体,在窗体上添加一个命令按钮,然后在代码窗口中添加以下代码:
===============================================
Private Sub Command1_Click()
Const msg1 As String="请在这里输入你想显示的一段话!"
Const msg2 As String="这里是对话框要显示的标题."
MsgBox msg1,vbOkOnly,msg2 '此处代码一定不能添加()
End Sub
===============================================
记住,1楼的代码会出现编译错误,在不需要返回值的时候就不能添加(),而在需要返回值的时候就一定要添加().

回答2:

Private Sub CommandButton1_Click()
MsgBox ("OK?")

End Sub