超级列表框导入问题

华庭大哥

如题 每行的数字分别导入对应的超级列表中 求帮忙写全例程

喵娘

  

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

变量名	类 型	静态	数组	备 注
列表索引	文本型		0
nikoni	文本型		0
i	整数型
长度	整数型
v	整数型
值	文本型
o	整数型
x	整数型

列表索引 ＝ { “Z”, “Y”, “1”, “2”, “3”, “4”, “5” }
nikoni ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (nikoni), i)
长度 ＝ 取文本长度 (nikoni [i])
x ＝ 超级列表框1.插入表项 (, , , , , )
计次循环首 (长度, v)
值 ＝ 取文本中间 (nikoni [i], v, 1)
计次循环首 (取数组成员数 (列表索引), o)
如果真 (值 ＝ 列表索引 [o])
超级列表框1.置标题 (x, o － 1, 值)

计次循环尾 ()
计次循环尾 ()
计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 列表索引, 文本型, , "0"<br /> .局部变量 nikoni, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 长度, 整数型<br /> .局部变量 v, 整数型<br /> .局部变量 值, 文本型<br /> .局部变量 o, 整数型<br /> .局部变量 x, 整数型<br /> <br /> <br /> 列表索引 ＝ { “Z”, “Y”, “1”, “2”, “3”, “4”, “5” }<br /> <br /> nikoni ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (nikoni), i)<br />     长度 ＝ 取文本长度 (nikoni <i>)<br />     x ＝ 超级列表框1.插入表项 (, , , , , )<br />     .计次循环首 (长度, v)<br /> <br />         值 ＝ 取文本中间 (nikoni <i>, v, 1)<br />         .计次循环首 (取数组成员数 (列表索引), o)<br />             .如果真 (值 ＝ 列表索引 [o])<br /> <br /> <br />                 超级列表框1.置标题 (x, o － 1, 值)<br /> <br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />     .计次循环尾 ()<br /> .计次循环尾 ()

喵娘

  

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

变量名	类 型	静态	数组	备 注
列表索引	文本型		0
nikoni	文本型		0
i	整数型
长度	整数型
v	整数型
值	文本型
o	整数型
x	整数型

列表索引 ＝ { “Z”, “Y”, “1”, “2”, “3”, “4”, “5” }
nikoni ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (nikoni), i)
长度 ＝ 取文本长度 (nikoni [i])
计次循环首 (长度, v)
值 ＝ 取文本中间 (nikoni [i], v, 1)
计次循环首 (取数组成员数 (列表索引), o)
如果真 (值 ＝ 列表索引 [o])
x ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (x, o － 1, 值)

计次循环尾 ()
计次循环尾 ()
计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 列表索引, 文本型, , "0"<br /> .局部变量 nikoni, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 长度, 整数型<br /> .局部变量 v, 整数型<br /> .局部变量 值, 文本型<br /> .局部变量 o, 整数型<br /> .局部变量 x, 整数型<br /> <br /> <br /> 列表索引 ＝ { “Z”, “Y”, “1”, “2”, “3”, “4”, “5” }<br /> <br /> nikoni ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (nikoni), i)<br />     长度 ＝ 取文本长度 (nikoni <i>)<br />     .计次循环首 (长度, v)<br />         值 ＝ 取文本中间 (nikoni <i>, v, 1)<br />         .计次循环首 (取数组成员数 (列表索引), o)<br />             .如果真 (值 ＝ 列表索引 [o])<br />                 x ＝ 超级列表框1.插入表项 (, , , , , )<br /> <br />                 超级列表框1.置标题 (x, o － 1, 值)<br /> <br />             .如果真结束<br /> <br />         .计次循环尾 ()<br />     .计次循环尾 ()<br /> .计次循环尾 ()