Función validar números

Public Function validateNumeric(ByVal cod As String) As Boolean
        Return System.Text.RegularExpressions.Regex.IsMatch(cod, "^[0-9]+$")
    End Function