Cómo: Validar cadenas que representan direcciones de correo electrónico (Visual Basic)
En el ejemplo de código siguiente se establece una variable booleana que indica si una cadena representa una dirección de correo electrónico válida.
Ejemplo
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
Compilar el código
Llame a este método y pase la cadena que contiene una dirección de correo electrónico.
Programación eficaz
Este método comprueba que las direcciones de correo electrónico tengan el formato "alguien@ejemplo.com".
Utilice este código para validar la cadena antes de intentar utilizarla como una dirección de correo electrónico. Esto podría evitar otros errores en tiempo de ejecución.