易语言以标点符号分割为每行,如文本
- 提问者网友:皆是孤独
- 2021-03-22 07:15
春眠不觉晓?处处闻啼鸟.夜来风雨声!花落知多少;
分成
春眠不觉晓
处处闻啼鸟
夜来风雨声
花落知多少
每句话后面标点符号还是保留.
- 五星知识达人网友:长青诗
- 2021-03-22 08:26
.版本 2
.子程序 __启动窗口_创建完毕
.局部变量 当前位置, 整数型
.局部变量 待处理文本, 文本型
.局部变量 符号, 文本型, , "0"
.局部变量 计次, 整数型
.局部变量 取得位置, 整数型
.局部变量 计次1, 整数型
.局部变量 计次2, 整数型
.局部变量 分析完成, 逻辑型
待处理文本 = “春眠不觉晓?处处闻啼鸟.夜来风雨声!花落知多少;”
加入成员 (符号, “?”)
加入成员 (符号, “.”)
加入成员 (符号, “!”)
加入成员 (符号, “;”)
取数组成员数 (符号)
当前位置 = 1
.判断循环首 (分析完成 = 假)
取得位置 = 取文本长度 (待处理文本)
.计次循环首 (取数组成员数 (符号), 计次)
计次1 = 寻找文本 (待处理文本, 符号 [计次], 当前位置, 真)
.如果真 (计次1 ≠ -1 且 取得位置 > 计次1)
计次2 = 计次
取得位置 = 计次1
.如果真结束
.计次循环尾 ()
.如果真 (当前位置 - 1 = 取得位置)
跳出循环 ()
.如果真结束
输出调试文本 (取文本中间 (待处理文本, 当前位置, 取得位置 - 当前位置 + 取文本长度 (符号 [计次2])))
当前位置 = 取得位置
当前位置 = 当前位置 + 取文本长度 (符号 [计次2])
计次 = 0
计次1 = 0
.判断循环尾 ()
再问: 输出调试的文本怎么调人入编辑框内?谢谢!
再答: .版本 2
编辑框1.是否允许多行 = 真
编辑框1.加入文本 (取文本中间 (待处理文本, 当前位置, 取得位置 - 当前位置 + 取文本长度 (符号 [计次2])) + #换行符) 属另一问题,望加财富。
再问: 怎么编辑框1显示不了内容。成功后会多加30财富值给你,辛苦了,谢谢!
再答: .版本 2
.子程序 __启动窗口_创建完毕
.局部变量 当前位置, 整数型
.局部变量 待处理文本, 文本型
.局部变量 符号, 文本型, , "0"
.局部变量 计次, 整数型
.局部变量 取得位置, 整数型
.局部变量 计次1, 整数型
.局部变量 计次2, 整数型
.局部变量 分析完成, 逻辑型
待处理文本 = “春眠不觉晓?处处闻啼鸟。夜来风雨声!花落知多少;”
加入成员 (符号, “?”)
加入成员 (符号, “。”)
加入成员 (符号, “!”)
加入成员 (符号, “;”)
取数组成员数 (符号)
当前位置 = 1
.判断循环首 (分析完成 = 假)
取得位置 = 取文本长度 (待处理文本)
.计次循环首 (取数组成员数 (符号), 计次)
计次1 = 寻找文本 (待处理文本, 符号 [计次], 当前位置, 真)
.如果真 (计次1 ≠ -1 且 取得位置 > 计次1)
计次2 = 计次
取得位置 = 计次1
.如果真结束
.计次循环尾 ()
.如果真 (当前位置 - 1 = 取得位置)
跳出循环 ()
.如果真结束
编辑框1.是否允许多行 = 真
编辑框1.加入文本 (取文本中间 (待处理文本, 当前位置, 取得位置 - 当前位置 + 取文本长度 (符号 [计次2])) + #换行符) 当前位置 = 取得位置
当前位置 = 当前位置 + 取文本长度 (符号 [计次2])
计次 = 0
计次1 = 0
.判断循环尾 ()