 |
用下面的语句：
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
' 使VB放弃鼠标捕捉
Text1.Enabled = False
Text1.Enabled = True
' 显示你自己的菜单
PopupMenu mnuPopup
End Sub
微软的Knowledge Base的文章：“Q224302 HOWTO: Suppress a TextBox Control's Popup Menu”提供了一种利用子类技术截取WM_CONTEXTMENU的方法，这种方法比较正规，但是也比较麻烦。
此问题由李海回答。
附加关键字：编程, 源程序, programming, source code, Visual Basic, VB, 标准控件, screen, button, combo, checkbox, listbox, 窗体与菜单, form, window, tform。
|
如何更改设置TEXTBOX的右键菜单
