Replace Default Popup Menu (without subclassing)

[Deepak Sakpal]

' Create your own menu in the VB menu editor, and then call it on 
' the 'MouseDown' event of your textbox
 
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = vbRightButton Then
        Text1.Enabled = False
        DoEvents
        Text1.Enabled = True
        PopupMenu mnuYourMenu
    End If
End Sub