Como: Validar cadeias de caracteres que representam endereços de email (Visual Basic)
O exemplo de código a seguir define umavariável boolianoque indica se uma seqüência de caracteres representa um endereço deemail válido.
Exemplo
Function ValidateEmail(ByVal email As String) As Boolean
Dim emailRegex As New System.Text.RegularExpressions.Regex(
"^(?<user>[^@]+)@(?<host>.+)$")
Dim emailMatch As System.Text.RegularExpressions.Match =
emailRegex.Match(email)
Return emailMatch.Success
End Function
Compilando o código
Chame esse método , passando a seqüência de caracteres que contém um endereço de email .
Programação robusta
Esse método valida os endereços de email que o formulário "someone@example.com".
Use este código para validar a seqüência de caracteres antes de tentar usá-lo como um endereço de email . Isso pode impedir outros erros em tempo de execução.