KeyPress - Esiste un'alternativa???

[Ines_70]

Salve a tutti... L'evento Keypress mi permette di intercettare la pressione di qualsiasi tasto ma il problema che ho incontrato è che se ho la necessità di simulare la pressione di un tasto con SendKeys, mi si appuppa tutto ovviamente, in quanto, l'evento Keypress interpreta SendKeys come un tasto e controlla ogni volta di quale tasto si tratta.
Non esiste mica una funzione tipo LASTKEY() (in altri linguaggi) che memorizza il codice dell'ultimo tasto premuto????
Potete darmi un'idea su come raggirare l'ostacolo???

Grazie per l'attenzione - Ines

[Ines_70]

Un'altra domandina semplice semplice:
il codice sottostante dovrebbe (ma non è così) ripulire il contenuto di una textbox alla pressione di qualsiasi tasto, ma in realtà l'ultimo tasto premuto resta sempre visualizzato.
Dove commetto l'errore???

Private Sub Text1_KeyPress(KeyAscii As Integer)
    Text1.Text = ""
End Sub

Grazie e buona programmazione a tutti - INES

[Don Navarro]

Prova cosi:

Private Sub Text1_KeyPress(KeyAscii As Integer)
    Text1.Text = ""
KeyPress = 0
End Sub

[Don Navarro]

Scusa era così:

Private Sub Text1_KeyPress(KeyAscii As Integer)
    Text1.Text = ""
    KeyAscii = 0
End Sub

[Clipper_71]

Forse volevi scrivere :

Private Sub Text1_KeyPress(KeyAscii As Integer)
    Text1.Text = ""
KeyAscii = 0
End Sub

Infatti così funziona.....

[Don Navarro]

Non conosco il comando LASTKEY, l'unica cosa che mi viene in mente per aggirare il problema è dichiarare una variabile pubblica e impostarla a 0. Nella parte di codice dove utilizzi "SendKeys" impostare la suddetta variabile a 1 e successivamente nell'evento KeyPress controllo subito il valore della variabile e se è 1 la reimposto a 0 ed esco dalla Sub. Così facendo il codice dell'evento KeyPress viene ignorato quando è attivato da SendKeys.

[Ines_70]

ottima idea, proverò a fare cosi'.
Ciao e alla prossima.