Function 常用流程() Dim start_time = TickCount()//计算开始时间 Dim 流程操作=0 //定义开关 防止死循环 Do If 发布产品操作 = 1 Then ElseIf 判断页面(首页) = True Then ElseIf 判断页面(页面2) = True Then ElseIf 判断页面(页面3) = True Then ElseIf 判断页面(页面4) = True Then ElseIf 判断页面(成功页面) = True Then Else msg "无法识别任何页面",1000 End If If (TickCount() - start_time) > 3*1000*60 Then //超时间3分钟 TracePrint "超时....." Exit Do End If Loop End Function