[RESOLVED] validate email addresess with regular expressions

How can I validate an email address when it is entered in a text box?

Something like this perhaps?

VB Code:

Private Sub Text1_Validate(Cancel As Integer)
    Cancel = Not Text1.Text Like "*?@?*.?*"
End Sub