1.                 延时100毫秒
  2.                 （VBScript语句） t5=now
  3.                 （VBScript语句） t5=now
  4.             条件结束
  5.         条件结束
  6.     子程序结束,回到调用处
  7. 子程序结束,回到调用处