Use Your Own Popup Menus in VB4

Use Your Own Popup Menus in VB4

In VB4 if you want to show a popup menu for a text box, a system-providedcontext menu appears first, and your popup menu does not appearuntil you close the system context menu.

Here is a workaround:

 Private Sub Text1_MouseDown(Button _        As Integer, Shift As Integer, X _        As Single, Y As Single)If Button = 2 Then        Text1.Enabled = False        PopupMenu mnuFile        Text1.Enabled = TrueEnd IfEnd Sub


Share the Post: