关于分割文本的问题，求助，谢谢好心人
.版本 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 ，分割不成功，求解
需要分割的文本已上传至附件内，求好心人解惑，谢谢了！！！
:'(求好心人帮忙看下，为什么
看不懂呢:) 调用格式： 〈文本型数组〉 分割文本 （文本型 待分割文本，［文本型 用作分割的文本］，［整数型 要返回的子文本数目］） - 系统核心支持库->文本操作
英文名称：split
将指定文本进行分割，返回分割后的一维文本数组。本命令为初级命令。
参数<1>的名称为“待分割文本”，类型为“文本型（text）”。如果参数值是一个长度为零的文本，则返回一个空数组，即没有任何成员的数组。
参数<2>的名称为“用作分割的文本”，类型为“文本型（text）”，可以被省略。参数值用于标识子文本边界。如果被省略，则默认使用半角逗号字符作为分隔符。如果是一个长度为零的文本，则返回的数组仅包含一个成员，即完整的“待分割文本”。
参数<3>的名称为“要返回的子文本数目”，类型为“整数型（int）”，可以被省略。如果被省略，则默认返回所有的子文本。 liyim00 发表于 2021-3-31 21:42
调用格式： 〈文本型数组〉 分割文本 （文本型 待分割文本，［文本型 用作分割的文本］，［整数型 要返 ...
谢谢好心人 .版本 2
.支持库 spec
.局部变量 文本, 文本型
.局部变量 fg, 文本型, , "0"
文本 ＝ 编辑框1.内容
fg ＝ 分割文本 (文本, “.”, )
调试输出 (fg)
楼主发贴辛苦了，谢谢楼主分享！我觉得易语言吧是注册对了！
页:
[1]