09/12/2023 - jekisi ha scritto:
Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar = Microsoft.VisualBasic.ChrW(Keys.Return) Then
If e.KeyChar = "." Then e.KeyChar = ","
End If
End Sub
Così non va, premendo INVIO non succede nulla scrivendo nella text ad esempio 0.55
Ma tu riesci a leggere quello che scrivi (o copi da qualche parte)?
Traduco:
Se premi invio allora se il tasto premuto è un punto allora il tasto diventa virgola.
Il codice viene eseguito appena premi invio (in quel componente).
Scrivi solo
If e.KeyChar = "." Then e.KeyChar = “,”
End If
In ogni caso sarebbe meglio una maschera.
Il controllo dei caratteri digitati può essere utile per inibire l'uso di tasti che non siano numerici ad eccezione di invio, punto e virgola.