Discussion :

[anxious]

Bonjour, grace au forum j'ai pu trouver ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub txt_ip_3_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) _
Handles txt_ip_3.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

Etant donné que j'ai beaucoup de txt box a controler, je souhaiterais savoir comment réaliser une fonction générique qui permettrait de faire ce contrôle, (si c'est possible)

Merci

[Danyel]

Tu rajoutes autant de controle (à controler) dans le handle de la fonction.

[Hinault Romaric]

Tu peut créer ta fonction dans un module et appeler juste dans l'évènement keypres.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
public sub ControleTextBox(byref e as System.Windows.Forms.KeyPressEventArgs)
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

[anxious]

merci de votre aide

peut tu donner un exemple de l'appel du module dans le keypress stp? je crains de ne pas savoir faire.

Merci beaucoup.

[Hinault Romaric]

peut tu donner un exemple de l'appel du module dans le keypress stp? je crains de ne pas savoir faire.

Tu veut dire l'appel de la fonction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub txt_ip_3_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txt_ip_3.KeyPress
ControleTextBox(e)
End Sub

[anxious]

merci :p

[Hinault Romaric]

sa arrive si ton problème est résolue n'oublie de mètre sur la discussion.