Static Sub delayloop(delaytime)
   loopfinish = Timer + delaytime
   Do While Timer < loopfinish
   Loop
End Sub
Private Sub Form_Click()
  FontSize = 12
  Print "现在输出第一行"                  
  Print "等待5秒钟......"                 
  delayloop 5
  Print
  Print "现在输出第二行"
  Print "等待10秒钟......"
  Call delayloop(10)
  Print
  Print "输出第三行"
End Sub

运行结果是：1、显示“现在输出第一行”；2、等待5秒钟；3、显示“等待5秒钟.....”    空行    “现在输出第二行”；4、下面同上
我以为是：1、显示“现在输出第一行”，换行后，显示“等待5秒钟......”；2、等待5秒钟；3、输出空行后，显示“现在输出第二行”；4、略
我的理解错了吗？