Dim GetColorDo GetColor = GetPixelColor(532, 708)//获得坐标的颜色 //TracePrint Now() //TracePrint GetColor If GetColor <> "FFFFFF" Then For 1000//循环点击1000次 Tap 555, 680 Next Exit Do TracePrint GetColor End If Delay 10Loop
监控屏幕像素颜色变换，获取变换，触发点击。
本文共 296 字，大约阅读时间需要 1 分钟。
Dim GetColorDo GetColor = GetPixelColor(532, 708)//获得坐标的颜色 //TracePrint Now() //TracePrint GetColor If GetColor <> "FFFFFF" Then For 1000//循环点击1000次 Tap 555, 680 Next Exit Do TracePrint GetColor End If Delay 10Loop
监控屏幕像素颜色变换，获取变换，触发点击。
转载地址：http://sqybm.baihongyu.com/