Rem aIfColor 255,177,"DC1923",0 ThenMessageBox "找到蓝色了,进行下一步找红色" Call b()Else MessageBox "没找到呃"Goto aEnd IfSub b() IfColor 206,189,"106E1",0 Then MessageBox "找到红色了"End IfEnd SubEndScript