1.             注释：数组下标+1
  2.             延时 10 毫秒
  3.         循环结束
  4.     子程序结束
  5.     注释：-----------------------------------------------------------------------
  6.     注释：------------------------------------------------------ [判断时间子程序]
  7.     注释：-----------------------------------------------------------------------
  8.     子程序 判断时间()
  9.         令 c = 0
  10.         令 d = 0
  11.         循环 3 次
  12.             如果 IsNumeric(thetime(c)) = True 则
  13.                 注释：< IsNumeric 函数：返回布尔值指明表达式的值是否为数字>
  14.                 令 sj(d) = cint(thetime(c))
  15.                 (语句无法识别，可能有错误): /< CInt 函数：返回已被转换为整形子类型的变体的表达式>
  16.             否则
  17.                 跳转到标记 QMScript_End(子程序 判断时间)
  18.             条件结束
  19.             令 c = c + 1
  20.             令 d = d + 1
  21.             延时 10 毫秒
  22.         循环结束
  23.     子程序结束
  24.     注释：-----------------------------------------------------------------------
  25.     注释：-------------------------------------------------------- [脚本停止标记]
  26.     注释：-----------------------------------------------------------------------
  27.     标记 QMScript_End
  28.     (语句无法识别，可能有错误): MessageBox 输入错误 脚本停止运行
  29.     脚本停止运行
  30. 子程序结束