文本分割

与你共舞

.版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 数组, 文本型, , "0"
.程序集变量 计次, 整数型
.子程序 _按钮1_被单击
通用对话框1.打开 ()
编辑框1.内容 ＝ 通用对话框1.文件名
.子程序 _按钮2_被单击
编辑框2.内容 ＝ 到文本 (读入文件 (编辑框1.内容))
数组 ＝ 分割文本 (编辑框2.内容, 到文本 (#换行符), )
.计次循环首 (取数组成员数 (数组), 计次)
    ' 数组 [1] ＝ 取文本左边 (数组 [1], 8) ＋ 字符 (9) ＋ 取文本中间 (数组 [1], 10, 10)
    ' 数组 [2] ＝ 取文本左边 (数组 [2], 8) ＋ 字符 (9) ＋ 取文本中间 (数组 [2], 10, 10)
    ' 数组 [3] ＝ 取文本左边 (数组 [3], 8) ＋ 字符 (9) ＋ 取文本中间 (数组 [3], 10, 10)
    ' 数组 [4] ＝ 取文本左边 (数组 [4], 8) ＋ 字符 (9) ＋ 取文本中间 (数组 [4], 10, 10)

.计次循环尾 ()
如果有一万个数组【】那写多少呀；取出还得写出；求帮忙指教

大司命

  

计次循环首 (取数组成员数 (数组), 计次)
数组 [计次] ＝ 取文本左边 (数组 [计次], 8) ＋ 字符 (9) ＋ 取文本中间 (数组 [计次], 10, 10)
计次循环尾 ()

.计次循环首 (取数组成员数 (数组), 计次)<br />     数组 [计次] ＝ 取文本左边 (数组 [计次], 8) ＋ 字符 (9) ＋ 取文本中间 (数组 [计次], 10, 10)<br /> .计次循环尾 ()

Y罢不能

  

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
数组	文本型		0
数组2	文本型		0
计次	整数型
文本内容	文本型

数组 ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (取数组成员数 (数组), 计次)
加入成员 (数组2, 取文本左边 (数组 [1], 8) ＋ 字符 (9) ＋ 取文本中间 (数组 [1], 10, 10))
计次循环尾 ()
调试输出 (数组2)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 数组2, 文本型, , "0"<br /> .局部变量 计次, 整数型<br /> .局部变量 文本内容, 文本型<br /> <br /> 数组 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (数组), 计次)<br />     加入成员 (数组2, 取文本左边 (数组 [1], 8) ＋ 字符 (9) ＋ 取文本中间 (数组 [1], 10, 10))<br /> .计次循环尾 ()<br /> 调试输出 (数组2)

补充内容 (2019-1-17 19:31):
当我没发，没审题 {:4_256:}

易易语

用加入数组命令就行了吧，不要直接等于

补充内容 (2019-1-17 19:39):
哦错了。看错了。

补充内容 (2019-1-17 19:40):
数组 ＝ 分割文本 (编辑框2.内容, 到文本 (#换行符), )这行代码，不用到文本命令。也行。

走一回

加入成员最好，不会数组越界

jr21066

写出可使用取文本，效率很高