真心求助！谁能帮我把这段代码分割一下，加入到列表框中？

418235144

试了N多次了，实在是木有办法了，大家帮忙处理一下，在这里谢谢各位高手了，




这样写的代码真心的不行

  

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

变量名	类 型	静态	数组	备 注
网店分割	文本型		0
数据分割	文本型		0
i	整数型
n	整数型
索引	整数型

超级列表框1.全部删除 ()
网店分割 ＝ 分割文本 (编辑框1.内容, “],[”, )
计次循环首 (取数组成员数 (网店分割), i)
数据分割 ＝ 分割文本 (网店分割 [i], “,”, )
计次循环首 (取数组成员数 (数据分割), n)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))
超级列表框1.置标题 (索引, 1, 数据分割 [n])
超级列表框1.置标题 (索引, 2, 数据分割 [n])
计次循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 网店分割, 文本型, , "0"<br /> .局部变量 数据分割, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 n, 整数型<br /> .局部变量 索引, 整数型<br /> <br /> <br /> 超级列表框1.全部删除 ()<br /> <br /> 网店分割 ＝ 分割文本 (编辑框1.内容, “],[”, )<br /> .计次循环首 (取数组成员数 (网店分割), i)<br />     数据分割 ＝ 分割文本 (网店分割 <i>, “,”, )<br />     .计次循环首 (取数组成员数 (数据分割), n)<br /> <br />         索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />         超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))<br />         超级列表框1.置标题 (索引, 1, 数据分割 [n])<br />         超级列表框1.置标题 (索引, 2, 数据分割 [n])<br />     .计次循环尾 ()<br /> .计次循环尾 ()

546669204

  

变量名	类 型	静态	数组	备 注
网店分割	文本型		0
数据分割	文本型		0
i	整数型
n	整数型
索引	整数型

超级列表框1.全部删除 ()
编辑框1.内容 ＝ 子文本替换 (编辑框1.内容, #引号, , , , 真)
编辑框1.内容 ＝ 子文本替换 (编辑框1.内容, “[[[”, , , , 真)
网店分割 ＝ 分割文本 (编辑框1.内容, “],[”, )
计次循环首 (取数组成员数 (网店分割), i)
数据分割 ＝ 分割文本 (网店分割 [i], “,”, )
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (i))
超级列表框1.置标题 (索引, 1, 数据分割 [1])
超级列表框1.置标题 (索引, 2, 数据分割 [2])
超级列表框1.置标题 (索引, 3, 数据分割 [3])
超级列表框1.置标题 (索引, 4, 数据分割 [4])
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 网店分割, 文本型, , "0"<br /> .局部变量 数据分割, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 n, 整数型<br /> .局部变量 索引, 整数型<br /> <br /> <br /> 超级列表框1.全部删除 ()<br /> 编辑框1.内容 ＝ 子文本替换 (编辑框1.内容, #引号, , , , 真)<br /> 编辑框1.内容 ＝ 子文本替换 (编辑框1.内容, “[[[”, , , , 真)<br /> 网店分割 ＝ 分割文本 (编辑框1.内容, “],[”, )<br /> <br /> .计次循环首 (取数组成员数 (网店分割), i)<br /> <br />     数据分割 ＝ 分割文本 (网店分割 <i>, “,”, )<br /> <br /> <br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (索引, 0, 到文本 (i))<br />     超级列表框1.置标题 (索引, 1, 数据分割 [1])<br />     超级列表框1.置标题 (索引, 2, 数据分割 [2])<br />     超级列表框1.置标题 (索引, 3, 数据分割 [3])<br />     超级列表框1.置标题 (索引, 4, 数据分割 [4])<br /> <br /> <br /> .计次循环尾 ()

无阻

源码呢  

文本都不知道怎么弄

418235144

谁能帮我把这段代码分割一下，加入到列表框中.rar (111.66 KB, 下载次数: 10)

2014-8-13 15:51 上传

点击文件名下载附件

E族x鬼才

  

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

变量名	类 型	静态	数组	备 注
网店分割	文本型		0
数据分割	文本型		0
i	整数型
索引	整数型

超级列表框1.全部删除 ()
网店分割 ＝ 分割文本 (编辑框1.内容, “],[”, )
计次循环首 (取数组成员数 (网店分割), i)
数据分割 ＝ 分割文本 (网店分割 [i], “,”, )
如果真 (取数组成员数 (数据分割) ＝ 2)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))
超级列表框1.置标题 (索引, 1, 数据分割 [1])
超级列表框1.置标题 (索引, 2, 数据分割 [2])

计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 网店分割, 文本型, , "0"<br /> .局部变量 数据分割, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 索引, 整数型<br /> <br /> 超级列表框1.全部删除 ()<br /> 网店分割 ＝ 分割文本 (编辑框1.内容, “],[”, )<br /> .计次循环首 (取数组成员数 (网店分割), i)<br />     数据分割 ＝ 分割文本 (网店分割 <i>, “,”, )<br />     .如果真 (取数组成员数 (数据分割) ＝ 2)<br />         索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />         超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))<br />         超级列表框1.置标题 (索引, 1, 数据分割 [1])<br />         超级列表框1.置标题 (索引, 2, 数据分割 [2])<br />     .如果真结束<br /> <br /> .计次循环尾 ()

418235144

源码加上去了

418235144

E族x鬼才 发表于 2014-8-13 15:51
[e=1].版本 2

.子程序 _按钮2_被单击

没反应！！您检查一下代码看能运行吗？

E族x鬼才

  

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

变量名	类 型	静态	数组	备 注
网店数组	文本型		0
数据数组	文本型		0
i	整数型
索引	整数型
n	整数型

超级列表框1.全部删除 ()
文本_取中间_批量 (编辑框1.内容, “[”, “]”, 网店数组)
计次循环首 (取数组成员数 (网店数组), i)
数据数组 ＝ 分割文本 (网店数组 [i], “,”, )
如果真 (取数组成员数 (数据数组) ≠ 0)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))
计次循环首 (取数组成员数 (数据数组), n)
超级列表框1.置标题 (索引, n, 子文本替换 (数据数组 [n], #引号, “”, , , 真))
计次循环尾 ()

计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 网店数组, 文本型, , "0"<br /> .局部变量 数据数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 索引, 整数型<br /> .局部变量 n, 整数型<br /> <br /> 超级列表框1.全部删除 ()<br /> 文本_取中间_批量 (编辑框1.内容, “[”, “]”, 网店数组)<br /> .计次循环首 (取数组成员数 (网店数组), i)<br />     数据数组 ＝ 分割文本 (网店数组 <i>, “,”, )<br />     .如果真 (取数组成员数 (数据数组) ≠ 0)<br />         索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />         超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))<br />         .计次循环首 (取数组成员数 (数据数组), n)<br />             超级列表框1.置标题 (索引, n, 子文本替换 (数据数组 [n], #引号, “”, , , 真))<br />         .计次循环尾 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()

修改后的

418235144

546669204 发表于 2014-8-13 15:56
[e=0].版本 2
.支持库 iext

果然厉害，到底是高手呀！行了，谢谢你！