Je veux seulement la lettre pour être accepté dans la zone de texte sur vb.net

Ive essayé de le faire, de sorte que la zone de texte accepte uniquement les lettres, mais la validation ne fonctionne pas.
Même quand je entrer des numéros, il la traite et affiche la première lblError de "Merci pour vos détails", où il devrait être "Entrer Un Nom Valide ".
leur sont des essais de validation similaire à IsNumeric pour ce type de problème?
plz help

    Dim MyName As String
    If txtMyName.Text Then
        MyName = txtMyName.Text
        lblError.Text = "Thankyou for your details"
    Else
        lblError.Text = "Enter A Valid Name "

    End If

End Sub

Fin De La Classe

Et j'ai besoin de l'aide de méthodes simples, rien à [a-zA-Z0-9], ou de modèles RegEx, que ive fait des recherches et je ne peut pas les utiliser.

Merci

Cela ressemble à un travail à la maison. Vous êtes à la recherche d'un moyen d'empêcher l'utilisateur d'entrer, si c'est le cas regarder les événements. Si vous souhaitez valider après avoir entré une façon peut être de vérifier chaque personnage individuellement et de voir si c'est un nombre.
peut-être juste utiliser RegularExpressionValidator: msdn.microsoft.com/en-us/library/...
Merci, mais ce n'est pas un devoir à la maison, je suis tout à fait d'apprentissage sur vb.net pour moi-même et à partir de la base,
Le principe de base est que, pour correspondre à une strinh de lettres d'une expression régulière est le meilleur moyen. Je ne sais pas du tout isStringLetters construit en. La raison pour laquelle nous sommes tous en disant regex est parce que c'est la meilleure façon pour nous de savoir (plus le moins de lignes de code

InformationsquelleAutor user1944225 | 2013-01-04

4

Vous pouvez vérifier la chaîne de texte, c'est à dire, textbox1.texte, pour s'assurer qu'il n'a rien en plus de lettres de l'alphabet dans l' .Laisser événement. Cela permettra de rattraper une erreur lorsque l'utilisateur onglets à la commande suivante, par exemple. Vous pouvez le faire à l'aide d'une expression régulière (Système d'importation.Texte.RegularExpressions pour cet exemple), ou vous pouvez vérifier le texte "manuellement".
```
Private Sub TextBox1_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Leave
  If Not Regex.Match(TextBox1.Text, "^[a-z]*$", RegexOptions.IgnoreCase).Success Then
    MsgBox("Please enter alpha text only.")
    TextBox1.Focus()
  End If

End Sub
```
Si vous voulez arrêter de l'utilisateur dès qu'un non-alpha touche est enfoncée, vous pouvez utiliser l'événement TextChanged à la place de la .Laisser événement.
- +1 - solution Sympa!
- Merci mais vous avez utilisé les regex, c'est leur moyen de valider ou sans l'aide de regex?
InformationsquelleAutor I kiet

Regex est la façon la plus propre de le faire. Or vous avez demandé le chemin le plus long...

Cela fonctionne en supprimant toutes les lettres minuscules et majuscules d'une chaîne de caractères, laissant derrière autre chose. Si l'on puis voir combien de temps stringname.length la chaîne est après la suppression est terminée, et trouver le nombre est zéro, alors la validation a passé. Toutefois, si le nombre est supérieur à zéro, alors notre chaîne contenue non lettres de l'alphabet.

If (TextBox1.Text <> "") Then

    Dim userInput As String = TextBox1.Text
    Dim filteredUserInput As String = userInput

    Dim listOfLetters As String() = New String() {"A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z", "a", "b", "c", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z"}
    ' go through each letter in the 'listOfLetters' array and replace that letter with.. nothing
    For Each letter In listOfLetters
        filteredUserInput = Replace(filteredUserInput, letter, "")
    Next

    ' now we have done the work - count how many characters are left in the string, if it is more than 0 we have invalid characters
    If (filteredUserInput <> "") Then
        MsgBox("This failed validation, contains invalid chars (" + Str(filteredUserInput.Length) + ")")
    Else
        MsgBox("This passed validation")
    End If

End If

Ou si vous le souhaitez la fonction identifiés..

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If (TextBox1.Text <> "") Then
Dim userInput As String = TextBox1.Text
' if the 'isThisAValidString()' returns true then it is a valid (and has not faild validation) a-zA-Z
If (isThisAValidString(userInput) = True) Then
MsgBox("This is valid")
Else
MsgBox("This is not valid")
End If
End If
End Sub
Function isThisAValidString(input As String)
Dim userInput As String = input
Dim filteredUserInput As String = userInput
Dim listOfLetters As String() = New String() {"A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z", "a", "b", "c", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z"}
' go through each letter in the 'listOfLetters' array and replace that letter with.. nothing
For Each letter In listOfLetters
filteredUserInput = Replace(filteredUserInput, letter, "")
Next
' now we have done the work - count how many characters are left in the string, if it is more than 0 we have invalid characters
If (filteredUserInput <> "") Then
' this failed!
Return False
Else
'this passed
Return True
End If
End Function

Merci pour cette réponse, mais qu'est-ce que la longue guerre autour?
Vous pourriez passer par chaque lettre dans une chaîne de caractères, en vérifiant qu'il est de type char() nombre contre une présélection de gamme. Chaque lettre majuscules et minuscules ont un numéro unique attribué à eux afin de vérifier que ce sera le travail. MAIS je doute que cela va être très rapide si vous êtes en comparant les charges de longues chaînes de caractères
ok merci pour l'
J'ai changé mon code ci-dessus pour refléter votre long chemin autour de la demande

InformationsquelleAutor Chris

1

Pourquoi ne pas les regex? C'est le bon outil pour le travail, sauf si vous êtes en laissant quelque chose de vos questions.

Vous pouvez construire un tableau de tous les anglais ce genre de lettres (il s'agit d'une majuscule), alors vous pouvez vérifier si tous les caractères dans le nom est dans le tableau.
```
Private Shared Function IsLetters(s As String) As Boolean
For Each c As Char In s.ToUpper().ToCharArray()
If Not onlyLetters().Contains(c) Then
Return False
End If
Next
Return True
End Function
Private Shared Function onlyLetters() As Char()
Dim strs = New List(Of Char)()
Dim o As Char = "A"C
For i As Integer = 0 To 25
strs.Add(Convert.ToChar(o + i))
Next
Return strs.ToArray()
End Function
```
- Je ne peux pas utiliser pense comme regex car je n'ai pas appris encore, j'ai donc besoin de s'en tenir à de simples valiadation
- + 1 - bonne solution!
- Avez-vous maintenant la simple validation de l'itinéraire?
InformationsquelleAutor sjkp
0

Cela devrait aider, il doit travailler pour n'importe quel autre texte intrants, tels que les boîtes de saisie (peudo)
```
enter code here 
```
textbox1.textchanged

Dim vérifier, check2 as Boolean

check = textbox1.un texte comme "[A-Za-z]" " vérifications pour les lettres
check2 = textbox1.un texte comme "[0-9]" ' vérifie pas les lettres

si check = true et check2 = faux alors
ajouter du texte
elseif check = false ou check2 = vrai alors
ne pas ajouter du texte

espère que cela aide

InformationsquelleAutor Bayriss

Ne pouvez-vous pas utiliser les Caractères ASCII?
Comme ceci:

(sur l'événement keypress)

If Asc(e.KeyChar) <> 8 Then
If Asc(e.KeyChar) < 65 Or Asc(e.KeyChar) > 122 Then
' from 65 to 90 A - Z String is allowed ( Uppercase letter )
' from 97 to 122 a - z String is allowed ( Lowercase letter )
If Asc(e.KeyChar) > 97 Or Asc(e.KeyChar) < 91 Or Asc(e.KeyChar) = 95 Then
' As we dont need to include letters between 91-96 we add this code. 
' ASCII CHARACTER 95 is Underscore Character.  so we add this manually.
e.Handled = True
End If
End If
End If

Si vous N'avez pas besoin de permettre de soulignement"_", puis supprimer le "Or Asc(e.KeyChar) = 95"
Vous pouvez le faire facilement.
vous devriez regarder les Caractères ASCII Table pour le faire vous-même.
Vous pouvez consulter le tableau ICI

InformationsquelleAutor

0

D'abord, vous devez savoir que vous êtes à l'aide de l'Unicode.

Deuxième, Unicode est compliqué. En particulier, .NET les Chaînes de l'utilisation de code UTF-16 unités, un ou deux de qui codent pour une codepoint. Aussi, certains codepoints sont "en combinant les caractères"—ils ne peuvent pas se tenir debout sur leur propre, mais souvent apparaissent seuls ou en se multiplie après les lettres.

Ci-dessous est la logique de validation. Il va par la chaîne, et vérifie que la première codepoint de chaque élément de texte (aka graphème) est une lettre Unicode.
```
Dim input = "ØysteinRene"+ Char.ConvertFromUtf32(&H301) +"e Galois" 
'COMBINING ACUTE ACCENT' (U+0301)
Dim etor = System.Globalization.StringInfo.GetTextElementEnumerator(input)
While (etor.MoveNext()) 
Dim grapheme = etor.GetTextElement()
' check the first codepoint in the grapheme 
' (others will only be "combining characters")
If Not Char.IsLetter(grapheme,0) Then 
Throw New Exception("Your input doesn't match my idea of a name at """  _
+ grapheme + """")
End If
End While
```
BTW—Vous avez une vision étroite de ce qu'un nom est. J'ai jeté dans un espace de pause d'une idée fausse; C'est un cas évident. Mais, en général, je ne voudrais pas dire aux utilisateurs que je considère comme leur nom invalide.

InformationsquelleAutor Tom Blodget

Vous devez vous connecter pour publier un commentaire.