How to suppress "Right-Click" action on a text box

[GraeagleBill]

I need to allow right-click in Record Selector column on a continuous form to allow deletion of a record, BUT NOT on the contents of a text box within the record. I don't see any text box property where that can be controlled. While the user needs to be able to "Cut" the record, a right-click in the wrong spot could potentially inadvertently clear a record field, so I'm just trying to avoid that.
Bill

[jwhite]

You can use the MouseUp event on the textbox:

Private Sub Text0_MouseUp(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
If Button = acRightButton Then
MsgBox "You pressed the right button."
End If
End Sub

Have it for each text box or have the MouseDown event call a common function.

[GraeagleBill]

The event fires as expected but that doesn't suppress the right-click popup menu.

[jwhite]

Was hoping you would check out something like: https://msdn.microsoft.com/en-us/lib.../ff836964.aspx

[John_G]

Here you are - how to cancel right-click for a control.

Use the Mouse-up event, and it's one line of code:

Private Sub Main_Description_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
  If Button = 2 Then DoCmd.CancelEvent
End Sub

Button = 2 is right-click.

[GraeagleBill]

Thinking you intended I add the CancelEvent, I tried this code:

If Button = acRightButton Then
DoCmd.CancelEvent
MsgBox "You pressed the right button."
End If

But the right-click popup continues to display

[John_G]

The docmd.CancelEvent has to be in the MouseUP event, not the MouseDown event.

[GraeagleBill]

Right you are!

Private Sub tbAcctName_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
' Trap and suppress any potential occurrences of a right-click pop-up menu, lest the
' account name field get inadvertently left blank.
'*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*
    If Button = acRightButton Then DoCmd.CancelEvent
End Sub

Thanks,
Bill

[CJ_London]

if you want to prevent any shortcut menus appearing set the form shortcut menu property (on other tab) to no

[GraeagleBill]

Yes, I'm aware of that. But, the problem to be solved had to do with text boxes within the displayed records BUT NOT suppressing the form's properties.
Thanks for your thoughts,
BIll