如何使快捷菜单从form中连续弹出

mi6236 2003-09-24 08:46:19
Private Sub Form_Mouseup(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
PopupMenu menu1
End If
End Sub
上面代码右键单击一次能弹出menu1,再单击右键没有反应,需单击左键再单击右键才能弹出menu1。
如何只单击右键就能连续弹出menu1.
谢谢!
...全文
93 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
地狱余烬 2003-09-24
  • 打赏
  • 举报
回复
用在PopupMenu menu1 前写 me.refresh
northwolves 2003-09-24
  • 打赏
  • 举报
回复
弹出右键菜单应选定或取消后再进一步操作
mi6236 2003-09-24
  • 打赏
  • 举报
回复
不行,我本来就写的down,后来因为不行,才改为的up.
yongtang 2003-09-24
  • 打赏
  • 举报
回复
Form_MouseUp

改成

Form_MouseDown

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧