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
Private Sub Text1_Validate(Cancel As Integer) Cancel = Not Text1.Text Like "*?@?*.?*" End Sub
Take a moment to rate useful posts VB6 CodeBank: Glass Form & Tracing App , MouseWheel with Any Control , Form Previewer Utility VB6 Snippets: RTB: Disable Smooth Scrolling , Form: Left & Right Justified Text in TitleBar , ListBox: As-You-Type Filtering (fast) , MSFlexGrid: Non-Adjacent Col/Row Selection , IsProcessRunning: PSAPI / WMI , PictureBox: Frame Look-A-Like , Open Folder in a Particular View , Form: Always on Bottom VBA Snippet: Generic Mouseover Workaround
Forum Rules