Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, x As Single, Y As Single) Text1.Enabled = False Text1.Enabled = True PopupMenu 自己定义一个菜单 End Sub
我想用API屏蔽PopupMenu的一些功能,能否做到呢?
可以的,用hook捕获WM_CONTEXTMENU即可. 要详细的信息请到microsoft上查阅Q224302的知识库文章,Title 为How To: Suppress a TextBox Control's Popup MenuGood luck!!!
to lxqlogo0(群子) :你的方法不行啊。 to ClassicWuHao(Mouse) 找到了屏蔽 Popup Menu 的方法。 看来要写一个Copy的程序了。
Text1.Enabled = False
Text1.Enabled = True
PopupMenu 自己定义一个菜单
End Sub
to ClassicWuHao(Mouse) 找到了屏蔽 Popup Menu 的方法。
看来要写一个Copy的程序了。