Buenas, veréis tengo el siguiente problema: Yo quiero tener una línea en la que introduzco un nombre, formado únicamente por letras, sin números ni caracteres especiales.
La siguiente clase es una clase de prueba para comprobar que valido campos correctamente antes de usar este código en el programa principal.
Este es mi código:
Imports System.Text.RegularExpressions
Module Module1
Sub Main()
Dim linea As String = " "
'Definimos expresiones regulares para controlar los input en las textbox(todos prohiben también caracteres especiales):
Dim patronLetras As String = "[A-Za-z]" 'Solo letras
Dim patronNum As String = "[1-9]" 'Solo números
Dim patronMixto As String = "[A-Za-z1-9]" 'Ambos
Dim caractEspecial = "ºª\!|@#·$%&/()=?¿¡,;.:-_<>[]{}*+"
While (linea <> "fin")
linea = Console.ReadLine()
Dim rgx As New Regex(patronLetras)
Dim matchTlf As Match = rgx.Match(linea)
If (matchTlf.Success = False Or linea.Contains(caractEspecial) = True) Then
Console.WriteLine("No coincide")
Else
Console.WriteLine("Coincide")
End If
End While
End Sub
End Module
El bloque IF debería decir que coinciden aquellos Strings que sean únicamente letras. En este momento estoy utilizando la expresión patronLetras para validar únicamente letras mayúsculas y minúsculas de la a a la z, y lo que me ocurre es:
- Si introduzco letras("adfadsfvvrevHAGSDCVV"), COINCIDE.
- si introduzco un carácter especial o un número(181), NO coincide.
- si introduzco letras y caracteres especiales(asdfTYER.-$), COINCIDE.
- si introduzco letras y números(hgvsdGASVD5352456), COINCIDE.
Mi pregunta es, ¿cómo puedo hacer para que estos dos últimos puntos no ocurran, puesto que yo solo quiero letras?