• Home
 · 
• Miscellaneous
 · 
• similar to clipper inkey() function

similar to clipper inkey() function

similar to clipper inkey() function

Rate similar to clipper inkey() function

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim StartTime As Long
Dim EndTime As Long

StartTime = 0
StartTime = Timer
EndTime = 0

Do While EndTime <> intDelayInSeconds
   EndTime = (Timer - StartTime)
   DoEvents
Loop

End Sub