Access - Setting Focus on a Textbox and selecting all the text in that textbox

Hello All,

I have an input Form where I validate the number being input in an AfterUpdate to make sure that the amount input is set multiple for the line being input...

That part works... However, in the Exit Event I have an Event that is Supposed to set the focus back to that input field [Amount].  However when I hit Enter on the ok button of the message box that comes up warning that the amount input is invalid, it is moving the focus to the Next field of the form...

I am wanting it to stay in that [Amount] field AND select all the characters input so that when the user starts typing it types over what's already there.  They shouldn't have to backspace or move the cursor to clear the field to startover.

This is what I have.....

Private Sub Amount_Exit(Cancel As Integer)
Dim strDenomination As String
strDenomination = Me.Denomination

    If Me.txtDenomInputProof <> 0 Then
        MsgBox "The amount entered must be a multiple of " & strDenomination & ".  Please review your input and correct.", vbOKOnly
        Cancel = True
        
        Me.Amount.SetFocus
        
    End If

End Sub

Select allOpen in new window