请问怎么用VB实现点击一个按钮弹出一个对话框

答案:4 悬赏:70

解决时间 2021-01-16 23:39

提问者网友：我没有何以琛的痴心不悔
2021-01-16 15:49

最佳答案

二级知识专家网友：有你哪都是故乡
2021-01-16 16:14

Private Sub Command1_Click()
MsgBox "因为你长的不够帅，所以执行了非法操作， " + Chr(13) + " " + Chr(13) + "此程序即将关闭，" + Chr(10) + " " + Chr(13) + "如果有问题，请与供应商联系。", 19, "系统信息"
End Sub

全部回答

1楼网友：一把行者刀
2021-01-16 17:53

最简单的就是用msgbox函数来实现:Private Sub Command1_Click()
msgbox "这里可以是你要描述的一句话"End Sub

2楼网友：一把行者刀
2021-01-16 17:41

Private Sub Command1_Click()
MsgBox "你好！", 0+0+0+0, "系统信息"
End Sub

3楼网友：长青诗
2021-01-16 16:32

Private Sub Command1_Click()
Dim x As Integer
x = MsgBox("内容", vbInformation, "标题") ' vbInformation是图标
End Sub

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息！