分割数组坐标 求助大神

陈雨泽

zb="126,201|100,228|58,204|66,228"
zbb = Split(zb, "|")
a=0
For   i=0 to UBound(zbb)
    ax=split(zbb(a),",")(0)
    ay=split(zbb(a),",")(1)
    dm.MoveTo ax,ay
    a=a+1
Next

这是按键分割数组的代码 哪位好心的大婶帮我转成e语言的  谢谢
或者 把 zb="126,201|100,228|58,204|66,228" 把这段代码的坐标分离出来

hellohexiang

分割.rar (949 Bytes, 下载次数: 12)

2015-4-17 13:41 上传

点击文件名下载附件

qq780571

其它差不多吧。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
临时文本	文本型
文本数组	文本型		0
计次	整数型

临时文本 ＝ “126,201|100,228|58,204|66,228”
文本数组 ＝ 分割文本 (临时文本, “|”, )
计次循环首 (取数组成员数 (文本数组), 计次)
鼠标_移动 (窗口_取屏幕句柄 (), 到整数 (文本_取左边 (文本数组 [计次], “,”, , )), 到整数 (文本_取右边 (文本数组 [计次], “,”, , )))
计次循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 临时文本, 文本型<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 计次, 整数型<br /> <br /> 临时文本 ＝ “126,201|100,228|58,204|66,228”<br /> 文本数组 ＝ 分割文本 (临时文本, “|”, )<br /> .计次循环首 (取数组成员数 (文本数组), 计次)<br />     鼠标_移动 (窗口_取屏幕句柄 (), 到整数 (文本_取左边 (文本数组 [计次], “,”, , )), 到整数 (文本_取右边 (文本数组 [计次], “,”, , )))<br /> .计次循环尾 ()

哭泣的訫

.版本 2

.子程序 分割坐标
.局部变量 局_文本, 文本型
.局部变量 局_文本分割, 文本型, , "0"
.局部变量 局_计次, 整数型
.局部变量 局_坐标, 文本型

局_文本 ＝ “126,201|100,228|58,204|66,228”
局_文本分割 ＝ 分割文本 (局_文本, “|”, )
.计次循环首 (取数组成员数 (局_文本分割), 局_计次)
    局_坐标 ＝ 局_文本分割 [局_计次]
.计次循环尾 ()

飞来飞去刀

先按“|”分割，得到是一对X和Y的坐标，然后在按“,”分割，就是分开了X和Y

陈雨泽

hellohexiang 发表于 2015-4-17 13:41

.版本 2

.程序集 窗口程序集1

.子程序 _按钮1_被单击
.局部变量 zb, 文本型
.局部变量 文本, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 xxx, 整数型
.局部变量 yyy, 整数型

zb ＝ “126,201|100,228|58,204|66,228”
文本 ＝ 分割文本 (zb, “|”, )
.计次循环首 (取数组成员数 (文本), i)
    xxx ＝ 分割文本 (文本 , “,”, 1)
    yyy ＝ 分割文本 (文本 , “,”, 2)
.计次循环尾 ()
提示数据错误

hellohexiang

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
zb	文本型
文本	文本型		0
内部分割	文本型		0
i	整数型
xxx	文本型
yyy	文本型

zb ＝ “126,201|100,228|58,204|66,228”
文本 ＝ 分割文本 (zb, “|”, )
计次循环首 (取数组成员数 (文本), i)
内部分割 ＝ 分割文本 (文本 [i], “,”, )
xxx ＝ 内部分割 [1]
yyy ＝ 内部分割 [2]
调试输出 (xxx, yyy)
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 zb, 文本型<br /> .局部变量 文本, 文本型, , "0"<br /> .局部变量 内部分割, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 xxx, 文本型<br /> .局部变量 yyy, 文本型<br /> <br /> zb ＝ “126,201|100,228|58,204|66,228”<br /> 文本 ＝ 分割文本 (zb, “|”, )<br /> .计次循环首 (取数组成员数 (文本), i)<br />     内部分割 ＝ 分割文本 (文本 <i>, “,”, )<br />     xxx ＝ 内部分割 [1]<br />     yyy ＝ 内部分割 [2]<br />     调试输出 (xxx, yyy)<br /> .计次循环尾 ()