c=0:d=0 For 3 If IsNumeric(thetime(c))=True //< IsNumeric 函数:返回布尔值指明表达式的值是否为数字> sj(d)=cint(thetime(c)) /< CInt 函数:返回已被转换为整形子类型的变体的表达式> Else Goto End EndIf c=c+1:d=d+1 Delay 10 EndFor Return 判断时间 //----------------------------------------------------------------------- //-------------------------------------------------------- [脚本停止标记] //----------------------------------------------------------------------- Rem End MessageBox 输入错误 脚本停止运行 EndScript Return 技能