最快的逐字分割源码,逐字分割文本例程,源码例程是易语言的基础应用教程。
.版本 2
.支持库 commobj
.子程序 _按钮5_被单击
.局部变量 n, 整数型
.局部变量 time
.局部变量 数据, 字节集
.局部变量 长度, 整数型
.局部变量 文本, 快速文本对象
编辑框2.内容 = “”
置等待鼠标 ()
n = 1
数据 = 到字节集 (编辑框1.内容)
长度 = 取字节集长度 (数据)
time = 取启动时间 ()
.判断循环首 (n ≤ 长度)
.如果 (数据 [n] > 127)
文本.添加 (字符 (数据 [n]))
文本.添加 (字符 (数据 [n + 1]))
n = n + 2
.否则
文本.添加 (字符 (数据 [n]))
n = n + 1
.如果结束
文本.添加 (“ ”)
.判断循环尾 ()
time = 取启动时间 () - time
编辑框2.内容 = 文本.取文本 (, )
编辑框2.加入文本 (#换行符 + “原文本长度:” + 到文本 (取文本长度 (编辑框1.内容)) + “ 分割耗时:” + 到文本 (time))
恢复鼠标 ()
@易语言入门教程-近在眼前