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