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

答案:5 悬赏:60 手机版

解决时间 2021-04-16 13:37

提问者网友：了了无期
2021-04-15 23:59

如题如何实现单击这个按钮弹出对话框来

最佳答案

五星知识达人网友：不如潦草
2021-04-16 00:44

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

全部回答

1楼网友：西风乍起
2021-04-16 02:36

再建一个form2 你在form运行编辑

Private Sub Command1_Click()

form2.show

End Sub

2楼网友：西风乍起
2021-04-16 01:47

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

3楼网友：洎扰庸人
2021-04-16 01:40

最简单的就是用msgbox函数来实现:

Private Sub Command1_Click() msgbox "这里可以是你要描述的一句话"

End Sub

4楼网友：空山清雨
2021-04-16 01:07

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

我要举报

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

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