关于分割文本的问题，求助，谢谢好心人

.版本 2

.支持库 xplib

.支持库 spec



.程序集 窗口程序集_启动窗口



.子程序 __启动窗口_创建完毕

.局部变量 表项索引, 整数型



XP风格 (1)



' 表项索引 ＝ 超级列表框1.插入表项 (, , , , , )  ' 插入表项内容设置例子

' 超级列表框1.置标题 (表项索引, 0, “1”)

' 超级列表框1.置标题 (表项索引, 1, “我的ID”)

' 超级列表框1.置标题 (表项索引, 2, “文本描述”)

' 调试输出 (表项索引)



.子程序 _按钮_打开_被单击

.局部变量 文件, 整数型

.局部变量 文件号, 整数型

.局部变量 内容, 文本型

.局部变量 表项索引, 整数型

.局部变量 分割文本, 文本型, , "0"

.局部变量 计次1, 整数型



通用对话框1.类型 ＝ 0

通用对话框1.过滤器 ＝ “TXT文本文档(*.txt)|*.txt”  ' 过滤器设置必须是在打开前面，切记

通用对话框1.打开 ()

编辑框1.内容 ＝ 通用对话框1.文件名

文件号 ＝ 打开文件 (编辑框1.内容, , )

内容 ＝ 读入文本 (文件号, )

关闭文件 (文件号)

分割文本 (内容, “begin”, 计次1)



调试输出 (分割文本)

文本被分割后，出现数组为0 ，分割不成功，求解

需要分割的文本已上传至附件内，求好心人解惑，谢谢了！！！