VBS我不会,就用点编程知识解决这个问题。为了节省开发时间,用易语言编写代码。
.版本 2
.支持库 eAPI
.程序集 程序集1
.子程序 _启动子程序, 整数型
.局部变量 命令行, 文本型, , "0"
取命令行 (命令行)
.如果真 (取数组成员数 (命令行) > 0)
.如果真 (命令行 [1] = “左键单击”)
模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 0)
.如果真结束
.如果真 (命令行 [1] = “右键单击”)
模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 2)
.如果真结束
.如果真 (命令行 [1] = “左键双击”)
模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 1)
.如果真结束
.如果真 (命令行 [1] = “右键双击”)
模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), 3)
.如果真结束
.如果真结束
返回 (0)