'Saisie chiffre uniquement, pas de lettre ni de virgule
If (Char.IsLetter(e.KeyChar)) Or (Char.IsPunctuation(e.KeyChar)) Then
e.Handled = True
End If
'Saisie lettre et ponctuation uniquement, pas de chiffre
If (Char.IsNumber(e.KeyChar)) Then
e.Handled = True
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questiontBox As TextBox
bOui As Button(marqué Oui)
bnon As Button(marqué Non)
Public Class Accueil
Private Sub bOui_Click(sender As System.Object, e As System.EventArgs) Handles bOui.Click
Dim Txt As String = "25"
Dim Nbr As Integer, Ok As Boolean
tBox.Text = Txt
Ok = Integer.TryParse(Txt, Nbr) : MessageBox.Show(Ok.ToString)
End Sub
Private Sub bNon_Click(sender As System.Object, e As System.EventArgs) Handles bNon.Click
Dim Txt As String = "a25"
Dim Nbr As Integer, Ok As Boolean
tBox.Text = Txt
Ok = Integer.TryParse(Txt, Nbr) : MessageBox.Show(Ok.ToString)
End Sub
End Class