On Sun, 4 Dec 2011 11:50:33 -0800 (PST), SS wrote:

On Dec 4, 12:58*pm, Ron Rosenfeld wrote:

frmLotNumber Like "[RMS0-9]#####"

will return TRUE or FALSE and you can incorporate this into your code to branch to whatever.

So something like:

Do Until frmLotNumber Like "[RMS0-9]#####"
* * * * msgbox("Invalid Entry")
* * * * 'Redisplay text box
loop- Hide quoted text -

- Show quoted text -

Thanks Gentlemen!!

I used this, and it works Beautifully!!

Do Until frmLotNumber.txtStartLotNumber Like "[RrMmSs0-9]#####"
MsgBox ("Invalid Entry")
txtStartLotNumber.SetFocus
Exit Sub
Loop

Glad to help. Thanks for the feedback.