[vb6] tasto premuto

[peppegiuseppe]

ho un problema... in vb6 esiste un modo per capire per quanti secondi è stato premuto un tasto?
tipo...
se è stato premuto per 2 secondi allora
l' immagine si sposta verso destra di 1
se è stato premuto per 3 secondi allora
l'immagine si sposta verso destra di 2
e cosi via...
grazie in anticipo per i vostri preziosissimi suggerimenti
peppegiuseppe

[eziogsv]

A naso, potresti inserire in un evento Timer, con intervallo settato a (esempio) 100 millisecondi un codice che utilizzi la API GetAsyncKeyState del tipo:

Static Counter as Integer = 0

if GetAsyncKeyState(Codice Tasto) then
   Counter + = 1
else
   'tasto sollevato
   If counter > 30 then
       --------------
   elseIf counter > 20 then
       --------------
   End If
   'azzero il counter
   Counter = 0
 End If

[eziogsv]

Edit: if GetAsyncKeyState(Codice Tasto) <> 0 Then...

[Grumpy]

La maggiorparte dei controlli - e anche l'ogetto Form - espongono gli eventi KeyDown e KeyUp. Memorizzando il valore restituito dalla funzione Timer durante il KeyDown in una variabile a livello di modulo, durante il KeyUp potrai facilmente calcolare quanti secondi sono trascorsi.

[eziogsv]

Anche. Ma il metodo da te suggerito funziona solo quando il Form od i controlli hanno lo stato attivo, mentre GetAsyncKeyState funziona comunque...

[Grumpy]

Il form ha la proprietà KeyPreview proprio per queste situazioni.