Want to be a web developer? You'll need to know HTML. Prepare for HTML5 certification by enrolling in July's Course of the Month! It's free for Premium Members, Team Accounts, and Qualified Experts.
Private Sub txtWorkPhone_AfterUpdate() txtWorkPhone = Trim(txtWorkPhone) Call Phone_Validation(txtWorkPhone) End Sub Private Sub Phone_Validation(txtPhoneNumber) If Left(txtPhoneNumber, 1) < 2 Then MsgBox ("Area Code Cannot Begin With Zero Or One") Else If Mid(txtPhoneNumber, 4, 1) < 2 Then MsgBox ("Telephone Prefix Cannot Begin With Zero Or One") End If End If End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.