Controler les données entrées dans une textboxRésolu

Question

Bonjour à tous,
Voila ma question peut vous paraître bête...
Mais je voudrais vérifier si les informations entrées dans une textbox sont de type integer

Merci d'avance

lillith212 · Accepted Answer

Re,

En cherchant sur le site tu auras des exemples.
http://www.vbfrance.com/codes/CONTROLE-SAISIE-NOMBRE-DANS-TEXTBOX_27082.aspx
Attention étudis le code et ne fais pas un simple copier coller

Bon courage

SLB

---------------------------------------------------------------
Il faut beaucoup donner pour recevoir un tout petit peu...
---------------------------------------------------------------

lillith212 · Answer

Salut,

Dans ta textbox tu va récupérer une chaine de caractère que tu convertira en integer. Par contre si tu veux que l'utilisateur n'utilise que les chiffres, tu dois verouiller tous les autres caractères ainsi tu n'auras pas de problème quand tu convertira en type integer.
fonction en vb6 pour convertir Cint(textbox1.text)

Bonne prog

SLB

---------------------------------------------------------------
Il faut beaucoup donner pour recevoir un tout petit peu...
---------------------------------------------------------------

jrivet · Answer

Salut, Autrement dit

1-pas le droit d'entrer des lettres

2-pas le droit de rentrer un nnombre trop grand

C'est bien ca? tu es bien .NET? @+: Ju£i?n Pensez: Réponse acceptée

darkchild007 · Answer

Waouw quelle rapiditée.
Merci de vos réponse [auteur/LILLITH212/1208539.aspx lillith212]& [auteur/JRIVET/89254.aspx jrivet]mais je souhaiterais que l'utilisateur n'ait pas le droit d'entrer des lettres. 
Merci d'avance

jrivet · Answer

Re, Version .NET => ATTENTION LE BACKSPACE n'est plus actif non plus pour .NET Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) _ Handles TextBox1.KeyPress If Not Char.IsDigit(e.KeyChar) Then 'Tous les caractères non numériques ne sont pas traités sur le TextBox. e.Handled = True End If End Sub

, ---- [code.aspx?ID=41455 By Renfield] Version VB6 Const ES_NUMBER As Long = &H2000& Const GWL_STYLE As Long = -16 Private Declare Function GetWindowLong Lib "user32.dll" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long Private Declare Function SetWindowLong Lib "user32.dll" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Private Function SetTextBoxNum(ByRef Obj As Object) As Boolean SetWindowLong Obj.hwnd, GWL_STYLE, GetWindowLong(Obj.hwnd, GWL_STYLE) Or ES_NUMBER End Function

' ==== Utilisation : 'Private Sub Form_Load() ' Call SetTextBoxNum(Text1) 'End Sub, ---- [code.aspx?ID=41455 By Renfield] @+: Ju£i?n Pensez: Réponse acceptée

lillith212 · Answer

Si c'est ok n'oubli pas de valider ;-)

---------------------------------------------------------------
Il faut beaucoup donner pour recevoir un tout petit peu...
---------------------------------------------------------------

darkchild007 · Answer

Merci beaucoup à vous deux je vai regarder à ca tout de suite.
Bonne journée

Controler les données entrées dans une textbox

7 réponses

Votre réponse