[VB6] Escludere caratteri non validi tramite evento OnKeyPress

[vr-claudio]

Ciao ragazzi
come posso impostare nell'evento KeyPress un carattere che non voglio che assolutamente si possa utlizzare?
Cioè, vorrei che quando l'utente provasse a selezionare sulla tastiera il carattere " ' " o l'accento francese, l'evento KeyPress non scriva nulla.

Grazie mille Claudio

[Stefano1984Mn]

Ciao Claudio Come sempre forza MAnTOVA.


prova a guradrare questo:

Private Sub Txt1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 97 To 122
' tutto ok; lettere da a alla z
End Select
'
Select Case KeyAscii
Case 65 To 90, 8
' tutto ok; lettere da A alla Z e Backspace
Case Else
KeyAscii = 0
End Select
End Sub

Questo esempio ti permette di inserire solo lettere o maiuscole o minuscole.
Se metti qualche atro carattere non te lo fa mettere.

[vr-claudio]

Ciao carissimo Stefano1984Mn
le tue sclamazioni mi fanno sempre troppo ridere, ti ringrazio per la tua immediata risposta
pero' mi servirebbe sapere proprio in particolare quello che avevo scritto perchè l'utente puo' scrivere tutto quello che vuole tranne " ' " o comunque tutte le parole accentate.

FORZA HELLAS
http://www.hellasverona.it/


Ciao e grazie in tanto
Claudio

[tippolo]

Ciao carissimo Stefano1984Mn
le tue sclamazioni mi fanno sempre troppo ridere, ti ringrazio per la tua immediata risposta
pero' mi servirebbe sapere proprio in particolare quello che avevo scritto perchè l'utente puo' scrivere tutto quello che vuole tranne " ' " o comunque tutte le parole accentate.

Mi sembra che il buon Stefano ti abbia dato la giusta soluzione, oppure non ho capito io la domanda

puo' scrivere tutto quello che vuole tranne " ' " o comunque tutte le parole accentate.

Devi solo escludere queste ( ' à è é ì ò ù )
' = KeyAscii 39
à = KeyAscii 224
è = KeyAscii 232
é = KeyAscii 233
ì = KeyAscii 236
ò = KeyAscii 242
ù = KeyAscii 249