Discussion :

[Vincent32]

Bonjour,

Est il possible de modifier le caractère . par , directement lors de sa saisie dans une textbox.

En VBA sous excel j'ai ce code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub MET_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) 'Formatage=> que des chiffres
    Select Case KeyAscii
        Case 8 'backspace
        Case 44 ',
        Case 46 '. transforme en ,
            KeyAscii = 44
        Case 48 To 57 '0 à 9
        Case 127 'supp.
        Case Else
            KeyAscii = 0
            MsgBox "Le caractere saisi n'est pas valide, veuillez entrer un nombre"
    End Select
End Sub

mais en VB.net je ne sais pas faire (il s'agit de mon premier programme)

Merci pour votre aide

[-N4w4k-]

Bonjour,

En vb.net, tu peux directement accéder aux évènements supportés par un control en allant dans la fenêtre propriété (designer) > évènements(icone éclair). Tu aura toute la liste et il te suffit de choisir. En double cliquant sur l'évènement, visual studio te génère la définition de la méthode:

Code :

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

1
2
3
    Private Sub TextBox1_KeyPress(sender As System.Object, e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
 
    End Sub

Il ne te reste plus qu'à la remplir:

Code :

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

1
2
3
4
5
    Private Sub TextBox1_KeyPress(sender As System.Object, e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If e.KeyChar = "." Then
            e.KeyChar = ","
        End If
    End Sub

Tout ceci est beaucoup mieux expliquer dans le cours épinglé à la racine du forum (lien)

[Vincent32]

Merci beaucoup pour ton aide. Par contre :

évènements supportés par un control

et

génère la définition de la méthode

sont du chinois pour moi. Je regarde en parallèle le cours de Philippe Lasserre.

Encore merci pour ton aide

[-N4w4k-]

Ce n'est peut être pas comme ça que l'on dit, donc je vais te laisser regarder le cours et voir ça par toi même, ça évitera de t'embrouiller. Dans tout les cas, ce cours est une bible pour apprendre le vb.net, tu trouvera tout ce que tu souhaite et même plus!

En tout cas, le deuxième bout de code de mon premier message fait ce que tu demandes.. (pour une TextBox appelée "TextBox1")

Bon courage pour la suite.
++

[Vincent32]

Oui ton code fonctionne très bien.

Bien que débutant je me débrouille tant bien que mal (avec mes faibles connaissances en VBA et le cours en question)

Encore merci de ton aide