Validare email in VB.NET

Oggi vediamo come validare una email in VB.NET.

Per farlo useremo System.ComponentModel.DataAnnotations, che dovete installare tramite NuGet.

Qui sotto un esempio di codice:

Imports System.ComponentModel.DataAnnotations

Module Module1

    Sub Main(ByVal args As String())
        Console.WriteLine(isEmailValid("test@test.it"))
        Console.WriteLine(isEmailValid("test@test.i"))
        Console.WriteLine(isEmailValid("testtest.it"))
        Console.WriteLine(isEmailValid("@test.it"))
    End Sub

    Function isEmailValid(email As String) As Boolean
        Dim addr = New EmailAddressAttribute()
        Return addr.IsValid(email)
    End Function

End Module

Enjoy!