按键精灵随机点选

Randomize
Dim coords(3) ’ 假设有4个坐标点
coords(0) = Array(825, 158) ’ 第一个坐标
coords(1) = Array(676, 160) ’ 第二个坐标
coords(2) = Array(644, 160) ’ 第三个坐标
coords(3) = Array(747, 160) ’ 第四个坐标

’ 随机选择一个坐标并点击
Dim index
index = Int(Rnd() * UBound(coords) + 1)
MoveTo coords(index)(0), coords(index)(1)