暂停程序不到一秒钟

Question

Ver简单示例：在用户窗体中移动CommandButton

Do Until CommandButton1.Left = 200
    CommandButton1.Left = CommandButton1.Left + 1
    Application.Wait(Now + ("0:00:0.5")) 'Doesn't work this way (requiers Integer)
Loop

所以我试图实现一个小于一秒的暂停的目标。我也试过

Application.Wait Now + TimeSerial(0, 0, 0.5) 'Doesn't work this way (requiers Integer)

还有其他方法可以暂停应用程序（最好不到一秒钟（让我们说0.5秒））？

提前感谢您的帮助！ ：）