如何分类加入超级列表框1 超级列表框2

黑色幽默ゞ

如何分类加入超级列表框1  超级列表框2



[e]
.版本 2.支持库 iext.子程序 _按钮2_被单击.局部变量 名称, 文本型, , "0".局部变量 数据, 文本型, , "0".局部变量 数量, 整数型.局部变量 起始位置, 整数型.局部变量 i, 整数型.局部变量 集数, 文本型.局部变量 地址, 文本型.局部变量 索引, 整数型名称 ＝ 分割文本 (编辑框1.内容, #换行符, )数量 ＝ 取数组成员数 (名称).计次循环首 (数量, i)    起始位置 ＝ 寻找文本 (名称 , “qvod:”, , 假)    集数 ＝ 取文本左边 (名称 , 起始位置 － 1)    地址 ＝ 取文本右边 (名称 , 取文本长度 (名称 ) － 起始位置 ＋ 1)    索引 ＝ 超级列表框1.插入表项 (, 集数, , , , )    超级列表框1.置标题 (索引, 1, 地址).计次循环尾 ()名称 ＝ 分割文本 (编辑框1.内容, #换行符, )数量 ＝ 取数组成员数 (名称).计次循环首 (数量, i)    起始位置 ＝ 寻找文本 (名称 , “bdhd:”, , 假)    集数 ＝ 取文本左边 (名称 , 起始位置 － 1)    地址 ＝ 取文本右边 (名称 , 取文本长度 (名称 ) － 起始位置 ＋ 1)    索引 ＝ 超级列表框2.插入表项 (, 集数, , , , )    超级列表框2.置标题 (索引, 1, 地址).计次循环尾 ()
[/e]

聚义堂神话

[e]
.版本 2
.支持库 iext

.子程序 _按钮2_被单击
.局部变量 名称, 文本型, , "0"
.局部变量 数据, 文本型, , "0"
.局部变量 数量, 整数型
.局部变量 起始位置, 整数型
.局部变量 i, 整数型
.局部变量 集数, 文本型
.局部变量 地址, 文本型
.局部变量 插入

名称 ＝ 分割文本 (编辑框1.内容, #换行符, )

.计次循环首 (取数组成员数 (名称), i)
    .判断开始 (寻找文本 (名称 , “qvod:”, , 假) ≠ -1)
        起始位置 ＝ 寻找文本 (名称 , “qvod:”, , 假)
        集数 ＝ 取文本左边 (名称 , 起始位置 － 1)
        地址 ＝ 取文本右边 (名称 , 取文本长度 (名称 ) － 起始位置 ＋ 1)
        插入 ＝ 超级列表框1.插入表项 (, , , , , )
        超级列表框1.置标题 (插入, 0, 集数)
        超级列表框1.置标题 (插入, 1, 地址)
    .判断 (寻找文本 (名称 , “bdhd:”, , 假) ≠ -1)
        起始位置 ＝ 寻找文本 (名称 , “bdhd:”, , 假)
        集数 ＝ 取文本左边 (名称 , 起始位置 － 1)
        地址 ＝ 取文本右边 (名称 , 取文本长度 (名称 ) － 起始位置 ＋ 1)
        插入 ＝ 超级列表框2.插入表项 (, , , , , )
        超级列表框2.置标题 (插入, 0, 集数)
        超级列表框2.置标题 (插入, 1, 地址)
    .默认

    .判断结束

.计次循环尾 ()
[/e]

黑色幽默ゞ

1.rar (2.37 KB, 下载次数: 8)

2013-5-29 11:01 上传

点击文件名下载附件

补充内容 (2013-5-29 11:02):
这个是错的源码

聚义堂神话

.版本 2
.支持库 iext

.子程序 _按钮2_被单击
.局部变量 名称, 文本型, , "0"
.局部变量 数据, 文本型, , "0"
.局部变量 数量, 整数型
.局部变量 起始位置, 整数型
.局部变量 i, 整数型
.局部变量 集数, 文本型
.局部变量 地址, 文本型
.局部变量 插入

名称 ＝ 分割文本 (编辑框1.内容, #换行符, )

.计次循环首 (取数组成员数 (名称), i)
    .判断开始 (寻找文本 (名称 [i], “qvod:”, , 假) ≠ -1)
        起始位置 ＝ 寻找文本 (名称 [i], “qvod:”, , 假)
        集数 ＝ 取文本左边 (名称 [i], 起始位置 － 1)
        地址 ＝ 取文本右边 (名称 [i], 取文本长度 (名称 [i]) － 起始位置 ＋ 1)
        插入 ＝ 超级列表框1.插入表项 (, , , , , )
        超级列表框1.置标题 (插入, 0, 集数)
        超级列表框1.置标题 (插入, 1, 地址)
    .判断 (寻找文本 (名称 [i], “bdhd:”, , 假) ≠ -1)
        起始位置 ＝ 寻找文本 (名称 [i], “bdhd:”, , 假)
        集数 ＝ 取文本左边 (名称 [i], 起始位置 － 1)
        地址 ＝ 取文本右边 (名称 [i], 取文本长度 (名称 [i]) － 起始位置 ＋ 1)
        插入 ＝ 超级列表框2.插入表项 (, , , , , )
        超级列表框2.置标题 (插入, 0, 集数)
        超级列表框2.置标题 (插入, 1, 地址)
    .默认

    .判断结束

.计次循环尾 ()

HDT流年

怎么个分类法？

‘一叶知秋

聚义堂神话 发表于 2013-5-29 11:13
[e]
.版本 2
.支持库 iext

支持支持

天小宇

答案.zip (2.79 KB, 下载次数: 2)

2013-5-29 11:19 上传

点击文件名下载附件 OK