文本分割 取中间内容 又来麻烦各位了 ---------------------------

Transcend

求助.rar (1.75 KB, 下载次数: 23)

2012-3-10 14:57 上传

点击文件名下载附件

寒嗳冰

给你写好了，看看

雨落无声

先使用换行符进行分割文本到数组，然后使用计次循环，再将每个数组成员在使用“----”分割文本到数组，取数组成员[3]，

Transcend

请您帮忙改一下 谢谢  半天都没搞明白

蟋蟀

.版本 2
.支持库 iext

.程序集 窗口程序集1

.子程序 _按钮1_被单击
.局部变量 文本数组, 文本型, , "0"
.局部变量 分割列, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 j, 整数型

.如果真 (通用对话框1.打开 ())
    文本数组 ＝ 分割文本 (到文本 (读入文件 (通用对话框1.文件名)), #换行符, )
    .计次循环首 (取数组成员数 (文本数组), i)
        分割列 ＝ 分割文本 (文本数组 [i], “----”, )
        超级列表框1.插入表项 (, , , , , )
        .计次循环首 (取数组成员数 (分割列), j)
            超级列表框1.置标题 (i － 1, j － 1, 分割列 [2])
        .计次循环尾 ()

    .计次循环尾 ()
.如果真结束

小川先生

直接上附件，不解释{:3_227:}

147888123

日。。。。。刚写完发现。。。。已经解决了

じ☆曉晨

寒嗳冰 发表于 2012-3-10 14:57
给你写好了，看看

这是怎么回事呀？

寒嗳冰

qq841207651 发表于 2012-3-10 16:09
这是怎么回事呀？

你的数据里面不能有空行，数据格式不能变

じ☆曉晨

寒嗳冰 发表于 2012-3-10 16:13
你的数据里面不能有空行，数据格式不能变

这样对吧？不行...{:soso__5181667176077425740_4:}