Private Function ValidateEmailID(ByVal GetEmailID As String) As Boolean
If GetEmailID.IndexOf("") > -1 And GetEmailID.LastIndexOf(".") > -1 And GetEmailID.LastIndexOf(".") <> (GetEmailID.Length - 1) Then
Return True
Else
Return False
End If
End Function

No comments:
Post a Comment