Originariamente inviato da Luciano79
Prova così
codice:
 Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        Dim KeyCode As Short = e.KeyCode
        If KeyCode = 110 Then
            SendKeys.SendWait(Chr(8))  'cancella l'ultimo carattere (il punto)
            SendKeys.SendWait(",")
        End If
    End Sub
l'ho testato funziona, ma il punto non è 110, è 190!
ficooo!
tu cancelli l'ultimo carattere!, beh certo puo' essere un'idea