vb 弹出窗体

答案:2 悬赏:10 手机版

解决时间 2021-03-12 18:09

提问者网友：你挡着我发光了
2021-03-12 14:19

Private Sub Command1_Click()
MsgBox "确认要弹出窗体2吗？"
Form2.Show
End Sub
如果我不想弹出窗体2,代码怎么写?

最佳答案

五星知识达人网友：鸽屿
2021-03-12 15:59

Private Sub Command1_Click()
If MsgBox("确认要弹出窗体2吗？", vbYesNo) = vbYes Then Form2.Show
End Sub

全部回答

1楼网友：由着我着迷
2021-03-12 16:17

1.在"菜单编辑器窗口"中建立一个将要作为弹出式菜单的主菜单项,如你所说的,就是"编辑"主菜单项,此菜单项的标题为"编辑",名称为"edit",所包含的菜单项为"剪切","复制","粘贴".建立弹出式菜单所需的菜单后,可以把"编辑"的visible属性设置为false,也可以设置为true,关键看你需要. 2.为建立好的菜单编写程序代码,要显示弹出式菜单,可以使用popupmenu方法,大概代码如下: private sub form_mouseup(button as integer,shift as integer,x as single,y as single) if button=2 then '检查是否按下的是鼠标右键 popupmenu edit 'edit是"编辑"菜单的控制名,将其激活显示在窗体上 end if end sub

我要举报

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

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