[VB6] Evento KeyPress e assorbimento del tasto

[Dexter1983]

Nel seguente codice ho un problemino tanto banale quanto irritante..

Private Sub txtValue_KeyPress(Index As Integer, KeyAscii As Integer)
Dim val As String
val = txtValue(Index).Text
If KeyAscii = 44 Then
    txtValue(Index).Text = val
    MsgBox "Use - . - insted of - , -", vbInformation
    Exit Sub
...

Tutto bene in fase di debug (debug.print), peccato che però poi la virgola la metta lo stesso..

Perchè tutto cio? E' una questione di "messaggeria" di Windows?
Come si può fare?

Grazie.

[oregon]

Private Sub txtValue_KeyPress(Index As Integer, KeyAscii As Integer)
Dim val As String
val = txtValue(Index).Text
If KeyAscii = 44 Then
    txtValue(Index).Text = val
    MsgBox "Use - . - insted of - , -", vbInformation
    KeyAscii = 0
    Exit Sub
...

[Dexter1983]

scusate per la banalità, ma ormai ero in loop infinito...

Grazie Oregon, sei più veloce della mia connessione (UMTS) VVoVe: