If IsNumeric(textbox1.text) Then MessageBox.Show("Le Textbox1.Text est numérique") Else MessageBox.Show("Le Textbox1.Text n'est pas numérique")
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPrivate Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress Dim pattern As String pattern = "[0-9]" If e.KeyChar <> System.Text.RegularExpressions.Regex.Match(e.KeyChar, pattern).ToString Then e.Handled = True End If End Sub