how do i make it so that my form will pause for a small amount of time?
i have tried the code

Public Sub Time_Timeout(howlong)
current = Timer
Do While Timer - current < Val(howlong)
DoEvents
Loop
End Sub

but it keeps saying current is not defined. How would I define current to timer? Or, how would I make my form pause for a limited amount of tme?