Advertisement
Guest User

Untitled

a guest
Jul 10th, 2014
199
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.21 KB | None | 0 0
  1. For a = 1 To 500000000
  2. Next a
  3.  
  4. Application.OnTime Now + TimeValue("00:00:1"), "ztest2"
  5. For a = 1 To 500000000
  6. Next a
  7.  
  8. 'Create a new class Tick_Timer to get access to NumTicks which counts ticks in ms.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement