最快的逐字分割源码

最快的逐字分割源码，逐字分割文本例程，源码例程是易语言的基础应用教程。

.版本 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))
恢复鼠标 ()

@易语言入门教程-近在眼前