Take look at this code:

Code:
  Sub Misc1()
   For i = 1 to 10
    Call Misc2 (i)
   Next i
  End Sub


 Sub Misc2(Num)
  Do ...
   ...
   Doevents
  Loop
 End Sub
When I call Misc2 with parametr i, the Do..Loop cycle is started and the Next i clause is called after exiting Misc2.

How to force the program to call Misc2 and continue doing what it should do (not waiting to subroutine end)?