Question

易语言取文字个数

如果文本中有文字和字母，怎样写啊

Answer 1

 

一楼那种/2的做法有很大的BUG，呵~

临时写的，代码有点长和乱（曾经有人嫌我的代码长，真无语），你可以根据情况自己整理，这只是思路，可统计出各种字符数量！

 

.版本 2

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

.局部变量 文本长度, 整数型

.局部变量 n, 整数型

.局部变量 临时, 文本型

.局部变量 文本, 文本型

.局部变量 中文数, 整数型

.局部变量 数字数, 整数型

.局部变量 大写字母, 整数型

.局部变量 小写字母, 整数型

.局部变量 其他, 整数型

.局部变量 a, 字节集

置等待鼠标 ()

文本 ＝ 编辑框1.内容

文本长度 ＝ 取文本长度 (文本)

.判断循环首 (n ≤ 文本长度)

    临时 ＝ 取文本中间 (文本, n, 1)

    .如果 (取代码 (临时, ) ＜ 0)

        临时 ＝ 取文本中间 (文本, n, 2)

        中文数 ＝ 中文数 ＋ 1

        n ＝ n ＋ 1

    .否则

        a ＝ 到字节集 (临时)

        .如果真 (取字节集长度 (a) ≠ 0)

            .判断开始 (a [1] ≥ 48 且 a [1] ≤ 57)

                数字数 ＝ 数字数 ＋ 1

            .判断 (a [1] ≥ 65 且 a [1] ≤ 90)

                大写字母 ＝ 大写字母 ＋ 1

            .判断 (a [1] ≥ 97 且 a [1] ≤ 122)

                小写字母 ＝ 小写字母 ＋ 1

            .默认

                其他 ＝ 其他 ＋ 1

            .判断结束

        .如果真结束

    .如果结束

    n ＝ n ＋ 1

.判断循环尾 ()

编辑框2.加入文本 (“中文数(包括标点符号)：” ＋ 到文本 (中文数) ＋ #换行符)

编辑框2.加入文本 (“数字数：” ＋ 到文本 (数字数) ＋ #换行符)

编辑框2.加入文本 (“大写字母：” ＋ 到文本 (大写字母) ＋ #换行符)

编辑框2.加入文本 (“小写字母：” ＋ 到文本 (小写字母) ＋ #换行符)

编辑框2.加入文本 (“其他：” ＋ 到文本 (其他) ＋ #换行符)

编辑框2.加入文本 (“统计总 字节数：” ＋ 到文本 (中文数 × 2 ＋ 数字数 ＋ 大写字母 ＋ 小写字母 ＋ 其他) ＋ #换行符)

编辑框2.加入文本 (“总 字节数：” ＋ 到文本 (文本长度) ＋ #换行符)

恢复鼠标 ()

 

 

 

 

Answer 2

.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
信息框 (“长度为：” ＋ 到文本 (取文本长度 (编辑框1.内容)), 0, )

——————————————————————————————————————————
一个文字算2个长度..所以是
——————————————————————————————————————————
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
信息框 (“长度为：” ＋ 到文本 (取文本长度 (编辑框1.内容)/2), 0, )

Answer 3

取文本长度 ()

调用格式： 〈整数型〉 取文本长度 （文本型 文本数据） - 系统核心支持库->文本操作
英文名称：len
返回文本型数据的长度，不包含结束0。本命令为初级命令。
参数<1>的名称为“文本数据”，类型为“文本型（text）”。参数值指定欲检查其长度的文本数据。

Answer 4

一楼说的差不多，但是如果有标点符号会出现bug的，，，我研究下……