Questa funzione VB.net serve per validare la correttezza formale di un indirizzo IP passato come argomento attraverso l’uso delle Espressioni Regolari.
Ritorna True se l’indirizzo è formalmente corretto, False altrimenti.
Codice
Imports System.Text.RegularExpressions
Private Function ValidaIP(ByVal indirizzoIP As String) As Boolean
Dim espressioneRegolare As String = "^((25[0-5]|2[0-4]\d|1\d\d|[1-9]\d|\d)\." & _
"(25[0-5]|2[0-4]\d|1\d\d|[1-9]\d|\d)\." & _
"(25[0-5]|2[0-4]\d|1\d\d|[1-9]\d|\d)\." & _
"(25[0-5]|2[0-4]\d|1\d\d|[1-9]\d|\d))$"
Return Regex.IsMatch(indirizzoIP, espressioneRegolare)
End Function