Question

怎么用易语言 取某个文本 某些字出现多少次？

Answer 1

.版本 2

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

.子程序 __启动窗口_创建完毕

编辑框1.内容 ＝ “4113884123238586741341.125346”  ' ''这是一个文本，根据你的需要更改

编辑框2.内容 ＝ “1”  ' ''这是要从上面文本中寻找的文本（即上面的文本中有多少个1？），根据你的需要更改

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

.局部变量 a, 整数型, , , 变量a用于判断要搜索的文本是否存在、判断文本的位置、判断下次搜索时的位置

.局部变量 b, 整数型, , , 变量b用于判断要搜索的文本的个数

a ＝ 0

b ＝ 0

.判断循环首 (a ≠ -1)  ' ''这个需要自己理解，很难解释→_→

    a ＝ 寻找文本 (编辑框1.内容, 编辑框2.内容, a ＋ 1, 假)

    b ＝ b ＋ 1

.判断循环尾 ()

b ＝ b － 1  ' ''-1的原因：因为在上面的循环中，b的值一定会比要搜索的文本的个数多1【在最后一次搜索中，除非要搜索的内容为“”，否则a的值一定是-1（即不存在），但b依然会+1】，所以现在必须-1

标签1.标题 ＝ 到文本 (b)  ' ''把b的值显示出来

' ''最后提醒一下：

' 1.需要两个编辑框，1个标签，1个按钮

' 2.标签显示的是要寻找的文本的个数，即你的要求

' 3.本人语文水平不高→_→

Answer 2

.版本 2
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 局_文本数组, 文本型, , "0"
.局部变量 局_出现次数, 整数型
局_文本数组 ＝ 分割文本 (“iugjhhjfhjfhgfhgfhgfjhf”, “h”, )
局_出现次数 ＝ 取数组成员数 (局_文本数组) － 1
调试输出 (局_出现次数)

Answer 3

用到精易模块

.版本 2
.子程序 功能_取文本出现次数, 整数型
.参数 要查的总文本, 文本型
.参数 要查次数的文本, 文本型
.局部变量 临时数组, 文本型, , "0"
.局部变量 成员数, 整数型
.局部变量 i, 整数型
.局部变量 返回数量, 整数型
成员数 ＝ 文本_逐字分割 (要查的总文本, 临时数组)
.计次循环首 (取数组成员数 (临时数组), i)
.如果 (临时数组 [i] ＝ 要查次数的文本)
返回数量 ＝ 返回数量 ＋ 1
.否则
.如果结束
.计次循环尾 ()
返回 (返回数量)

Answer 4

.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
写到文件 (取运行目录 () ＋ “/1.txt”, 到字节集 (编辑框1.内容))