请教如何把文本分段，但是不出现乱码

tansiryaya

如图所示，文本一里面是全汉字，每段分成8个汉字是没问题的，但是文本二里面会出现标点、字母、数字等1个字节的字符，请问如何分段时不出现乱码啊，分出来的第一段为8个字，第二段和第三段可以为7个字。不知道我表述清楚没有。 示例.e (5 KB, 下载次数: 5)

2025-3-8 20:35 上传

点击文件名下载附件




补充内容 (2025-3-8 20:38):
补充一下，示例文本二中的 字母、标点、符号等是随机出现的，不是出现在固定位置的。

b0y

示例.e (150.7 KB, 下载次数: 2)

2025-3-9 07:53 上传

点击文件名下载附件

b0y

直接转为unicode 中英文一样的长度

人杰啊

.版本 2
.支持库 spec

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

.子程序 _按钮1_被单击


编辑框3.内容 ＝ 取文本左边 (编辑框1.内容, 16)
编辑框4.内容 ＝ 取文本中间 (编辑框1.内容, 17, 16)
编辑框5.内容 ＝ 取文本中间 (编辑框1.内容, 33, 16)

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

文本_逐字分割 (编辑框2.内容, 分割数组)
调试输出 (分割数组)
.计次循环首 (取数组成员数 (分割数组), i)
    .如果真 (i ≤ 8)
        编辑框3.内容 ＝ 编辑框3.内容 ＋ 分割数组 [i]
    .如果真结束

    .如果真 (i ≤ 16 且 i ＞ 8)
        编辑框4.内容 ＝ 编辑框4.内容 ＋ 分割数组 [i]
    .如果真结束

    .如果真 (i ＞ 16)
        编辑框5.内容 ＝ 编辑框5.内容 ＋ 分割数组 [i]
    .如果真结束

.计次循环尾 ()

精易模块
另外也有别的思路 可以发散思维 这是最笨的方法

aipca

如果不是三的倍数，考虑加个余数进去，自己折腾一下吧。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
文本1	文本型	0
文本2	文本型	0

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

文本_逐字分割_快速 (编辑框1.内容, 文本1, )
文本_逐字分割_快速 (编辑框1.内容, 文本2, )

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
均分1	整数型
i	整数型
余数	整数型

均分1 ＝ 取数组成员数 (文本1) ÷ 3
计次循环首 (取数组成员数 (文本1), i)
判断 (i ≤ 1 × 均分1)
编辑框3.加入文本 (文本1 [i])
判断 (i ＞ 1 × 均分1 且 i ≤ 2 × 均分1)
编辑框4.加入文本 (文本1 [i])
判断 (i ＞ 2 × 均分1)
编辑框5.加入文本 (文本1 [i])



计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮2_被单击

变量名	类 型	静态	数组	备 注
均分2	整数型
i	整数型

均分2 ＝ 取数组成员数 (文本2) ÷ 3
计次循环首 (取数组成员数 (文本2), i)
判断 (i ≤ 1 × 均分2)
编辑框3.加入文本 (文本2 [i])
判断 (i ＞ 1 × 均分2 且 i ≤ 2 × 均分2)
编辑框4.加入文本 (文本2 [i])
判断 (i ＞ 2 × 均分2)
编辑框5.加入文本 (文本2 [i])



计次循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 文本1, 文本型, , "0"<br /> .程序集变量 文本2, 文本型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 文本_逐字分割_快速 (编辑框1.内容, 文本1, )<br /> 文本_逐字分割_快速 (编辑框1.内容, 文本2, )<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 均分1, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 余数, 整数型<br /> <br /> 均分1 ＝ 取数组成员数 (文本1) ÷ 3<br /> .计次循环首 (取数组成员数 (文本1), i)<br />     .判断开始 (i ≤ 1 × 均分1)<br />         编辑框3.加入文本 (文本1 <i>)<br />     .判断 (i ＞ 1 × 均分1 且 i ≤ 2 × 均分1)<br />         编辑框4.加入文本 (文本1 <i>)<br />     .判断 (i ＞ 2 × 均分1)<br />         编辑框5.加入文本 (文本1 <i>)<br />     .默认<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 均分2, 整数型<br /> .局部变量 i, 整数型<br /> <br /> 均分2 ＝ 取数组成员数 (文本2) ÷ 3<br /> .计次循环首 (取数组成员数 (文本2), i)<br />     .判断开始 (i ≤ 1 × 均分2)<br />         编辑框3.加入文本 (文本2 <i>)<br />     .判断 (i ＞ 1 × 均分2 且 i ≤ 2 × 均分2)<br />         编辑框4.加入文本 (文本2 <i>)<br />     .判断 (i ＞ 2 × 均分2)<br />         编辑框5.加入文本 (文本2 <i>)<br />     .默认<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()

走一回

用  文本_逐字分割，成员索引是8的倍数，就能避免中英文断字不齐的问题

一线之隔

文本_折行 (, , )

蘇中二少

示例.e (1.04 MB, 下载次数: 1)

2025-3-8 23:09 上传

点击文件名下载附件

tansiryaya

b0y 发表于 2025-3-9 07:53

请问一下，我的支持库太低了吗

b0y

tansiryaya 发表于 2025-3-9 10:33
请问一下，我的支持库太低了吗

升级新版本易语言