求助，求助，突然脑袋短路

SSe

.版本 2
.子程序 _按钮1_被单击
.局部变量 i, 整数型
i ＝ 到整数 (编辑框1.内容)
' 1 = 422,870
' 2 = 422,960
' 3 = 426,1042
' 4 = 359,866
' 5 = 359,956
' 6 = 357,1042
' 7 = 293,866
' 8 = 290,958
' 9 = 287,1043
' 0 = 222,898
鼠标_单击 (, , , )


如题：
i的数值小到0大到2000
如果i等368，怎么做到点击3,6,8，鼠标x跟y的坐标已经提取出来

KServer

  

子程序名	返回值类型	公开	备 注
Click
参数名	类 型	参考	可空	数组	备 注
Num	整数型

变量名	类 型	静态	数组	备 注
Pos	文本型		10
Bin	字节集
i	整数型
t	整数型
x	整数型
y	整数型
p	文本型

Pos [1] ＝ “222,898”  ' 0
Pos [2] ＝ “422,870”  ' 1
Pos [3] ＝ “422,960”  ' 2
Pos [4] ＝ “426,1042”  ' 3
Pos [5] ＝ “359,866”  ' 4
Pos [6] ＝ “359,956”  ' 5
Pos [7] ＝ “357,1042”  ' 6
Pos [8] ＝ “293,866”  ' 7
Pos [9] ＝ “290,958”  ' 8
Pos [10] ＝ “287,1043”  ' 9
Bin ＝ 到字节集 (到文本 (Num))
计次循环首 (取字节集长度 (Bin), i)
t ＝ 到整数 (到文本 (到字节集 (Bin [i])))
p ＝ Pos [t ＋ 1]
x ＝ 到整数 (取文本左边 (p, 寻找文本 (p, “,”, , 假)))
y ＝ 到整数 (取文本右边 (p, 取文本长度 (p) － 倒找文本 (p, “,”, , 假)))
计次循环尾 ()

.版本 2<br /> <br /> .子程序 Click<br /> .参数 Num, 整数型<br /> .局部变量 Pos, 文本型, , "10"<br /> .局部变量 Bin, 字节集<br /> .局部变量 i, 整数型<br /> .局部变量 t, 整数型<br /> .局部变量 x, 整数型<br /> .局部变量 y, 整数型<br /> .局部变量 p, 文本型<br /> <br /> Pos [1] ＝ “222,898”  ' 0<br /> Pos [2] ＝ “422,870”  ' 1<br /> Pos [3] ＝ “422,960”  ' 2<br /> Pos [4] ＝ “426,1042”  ' 3<br /> Pos [5] ＝ “359,866”  ' 4<br /> Pos [6] ＝ “359,956”  ' 5<br /> Pos [7] ＝ “357,1042”  ' 6<br /> Pos [8] ＝ “293,866”  ' 7<br /> Pos [9] ＝ “290,958”  ' 8<br /> Pos [10] ＝ “287,1043”  ' 9<br /> Bin ＝ 到字节集 (到文本 (Num))<br /> .计次循环首 (取字节集长度 (Bin), i)<br />     t ＝ 到整数 (到文本 (到字节集 (Bin <i>)))<br />     p ＝ Pos [t ＋ 1]<br />     x ＝ 到整数 (取文本左边 (p, 寻找文本 (p, “,”, , 假)))<br />     y ＝ 到整数 (取文本右边 (p, 取文本长度 (p) － 倒找文本 (p, “,”, , 假)))<br /> .计次循环尾 ()

这样？？？？

寒潮

文本_逐字分割（到文本（368））

ming7

取出中间文本（）

  

变量名	类 型	静态	数组	备 注
i	整数型
C	文本型

C ＝ “368”
计次循环首 (取文本长度 (C), i)
调试输出 (取文本中间 (C, i, 1))
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 i, 整数型<br /> .局部变量 C, 文本型<br /> <br /> C ＝ “368”<br /> .计次循环首 (取文本长度 (C), i)<br />     调试输出 (取文本中间 (C, i, 1))<br /> .计次循环尾 ()