按键精灵鼠标在固定的坐标内随机选择几个

Question

用按键精灵找了这有2组一百个坐标，怎么让鼠标在任意一列的10个坐标里面随机选取几个？
x280,y355 x447,y355 x612,y355 x780,y355 x945,y355
x280,y388 x447,y388 x612,y388 x780,y388 x945,y388
x280,y419 x447,y419 x612,y419 x780,y419 x945,y419
x280,y449 x447,y449 x612,y449 x780,y449 x945,y449
x280,y474 x447,y474 x612,y474 x780,y474 x945,y474
x280,y505 x447,y505 x612,y505 x780,y505 x945,y505
x280,y533 x447,y533 x612,y533 x780,y533 x945,y533
x280,y564 x447,y564 x612,y564 x780,y564 x945,y564
x280,y596 x447,y596 x612,y596 x780,y596 x945,y596
x280,y624 x447,y624 x612,y624 x780,y624 x945,y624

x280,y680 x447,y680 x612,y680 x780,y680 x945,y680
x280,y715 x447,y715 x612,y715 x780,y715 x945,y715
x280,y744 x447,y744 x612,y744 x780,y744 x945,y744
x280,y775 x447,y775 x612,y775 x780,y775 x945,y775
x280,y803 x447,y803 x612,y803 x780,y803 x945,y803
x280,y833 x447,y833 x612,y833 x780,y833 x945,y833
x280,y863 x447,y863 x612,y863 x780,y863 x945,y863
x280,y888 x447,y888 x612,y888 x780,y888 x945,y888
x280,y922 x447,y922 x612,y922 x780,y922 x945,y922
x280,y950 x447,y950 x612,y950 x780,y950 x945,y950

Answer 1

你的横坐标有5个，纵坐标20个，分别放入2个数组，用2个随机数分别取横纵坐标就可以了，不难追问

怎么操作的大哥。本人小白一枚。求教。

追答xx = Split("280 447 612 780 945")
yy = Split("355 388 419 449 474 505 533 564 596 624 680 715 744 775 803 833 863 888 922 950")
Randomize
Debug.Print xx(Int(5 * Rnd())); ","; yy(Int(20 * Rnd()))

追问

追答pos=xx(Int(5 * Rnd())) & "," & yy(Int(20 * Rnd()))
msgbox pos

Answer 2

不可以直接复制每一列的，你可以先逐行复制到excle表格中，这样就可以任意复制每一列了追答

复制到表格的时候，先把逗号去掉

将逗号改为空格，单元格会自动匹配的

追问

什么意思？复制什么表格？

追答

建立一个excle 将坐标信息复制到excle中，就能实现列复制了

追问

这样吗？把逗号删除？然后我要怎么实现用按键精灵在每一竖列的10个坐标里面随机选几个呢？

追答

误导你了……这个需要在按键精灵这个软件里面写随机函数的，网上有这种语句你搜一下

追问

能教教我怎么操作吗？小白一枚。

追答

网页链接按键精灵教程网，这个我也不太懂，当时以为知识普通的复制的，不好意思误导你了

Answer 3

Dim 坐标(3)
Do
坐标(0) = "11,22"
坐标(1) = "31,210"
坐标(2) = "51,202"
坐标(3) = "81,210"
Rem ks
Randomize
a = Int((3 - 0 + 1) * Rnd + 0)
Do
Randomize
b = Int((3 - 0 + 1) * Rnd + 0)
Loop While a = b
Do
Randomize
c = Int((3 - 0 + 1) * Rnd + 0)
Loop While c=a or c=b
坐标xy = split(坐标(a), ",")
x = 坐标xy(0)
y = 坐标xy(1)
MoveTo x, y
LeftClick 1
坐标xy = split(坐标(b), ",")
x = 坐标xy(0)
y = 坐标xy(1)
MoveTo x, y
LeftClick 1
坐标xy = split(坐标(c), ",")
x = 坐标xy(0)
y = 坐标xy(1)
MoveTo x, y
LeftClick 1
Loop追问

大哥这是写的代码吗？怎么操作？

本回答被网友采纳

Answer 4

不可以直接复制每一列的，你可以先逐行复制到excle表格中，这样就可以任意复制每一列了鸡柳骨灰级爱你最爱你住泪牛好突然

Answer 5

在百度搜索栏里输入site:网址查询，site指令是查询特定搜索引擎对指定网址收录量的搜索引擎指令，所有的搜索引擎都支持site指令查询，当然查询的数量结果并不准确。但某几个网站最关键时刻却是十分准确的，首先是当在某一个搜索引擎搜索框中输入site:网址查询时，如果返回查询结果有收录的话，则表明该网站已经被此搜索引擎收录。而一般已经被搜索引擎收录了的老网站如果突然在某一个搜索引擎搜索框中输入site:网址查询时，返回结果为零，不同时段多次查询结果都是这样，则证明该网站已经被搜索引擎K站了。