26/03/10 21:56
gvigliani
Postato originariamente da GrG:
usa una pausa...
Sub Pause(ByVal interval As Double)
Dim Current As Double
Current = Timer
Do While Timer - Current < interval
DoEvents
Loop
End Sub
usa una pausa...
Sub Pause(ByVal interval As Double)
Dim Current As Double
Current = Timer
Do While Timer - Current < interval
DoEvents
Loop
End Sub
Ti ringrazio ma non è di una pausa quello di cui avevo bisogno
. In effetti qualche messaggio addietro avevo detto che una sorta di wait(numsec) gia' la utilizzavo ma il problema è che ne' io, ne' il programma sappiamo quanto questa pausa dovrebbe durare. L'istruzione successiva dovrebbe essere portata a termine non appena quella precedente è stata conclusa.
Grazie comunque
aaa