Personally, I just use:
This locks the FPS to 60, regardless of the monitor refresh rate.
[edit] Of course, if the FPS doesn't divide exactly into the monitor refresh rate, things may not be quite as smooth.
fps_timer = CreateTimer(60) While Not KeyHit(1) . . . WaitTimer(fps_timer) VWait : Flip False Wend
This locks the FPS to 60, regardless of the monitor refresh rate.
[edit] Of course, if the FPS doesn't divide exactly into the monitor refresh rate, things may not be quite as smooth.