判断问题

aaa88888

如图，判断我这个字，在编辑框内最大连续出现了几次，这个应该怎么写，是最大连续出现过几次。（编辑框内的我字 最大连续出现4次）

Mr、Darren

老哥  好好在看看易语言基础教程吧

Mr、Darren

  

变量名	类 型	静态	数组	备 注
文本	文本型

文本 ＝ “你你我你我我我你我我你你你”
调试输出 (取最大出现次数 (文本, “你”))

子程序名	返回值类型	公开	备 注
取最大出现次数	整数型
参数名	类 型	参考	可空	数组	备 注
判断文本	文本型
被判断文本	文本型

变量名	类 型	静态	数组	备 注
文本数组	文本型		0
i	整数型
连续数组	整数型		0
z	整数型

文本_逐字分割 (判断文本, 文本数组)
计次循环首 (取数组成员数 (文本数组), i)
判断 (文本数组 [i] ＝ 被判断文本)
z ＝ z ＋ 1
加入成员 (连续数组, z)
z ＝ 0

计次循环尾 ()
数组排序 (连续数组, 假)
返回 (连续数组 [1])

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 文本, 文本型<br /> <br /> 文本 ＝ “你你我你我我我你我我你你你”<br /> 调试输出 (取最大出现次数 (文本, “你”))<br /> <br /> .子程序 取最大出现次数, 整数型<br /> .参数 判断文本, 文本型<br /> .参数 被判断文本, 文本型<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 连续数组, 整数型, , "0"<br /> .局部变量 z, 整数型<br /> <br /> 文本_逐字分割 (判断文本, 文本数组)<br /> .计次循环首 (取数组成员数 (文本数组), i)<br />     .判断开始 (文本数组 <i> ＝ 被判断文本)<br />         z ＝ z ＋ 1<br />     .默认<br />         加入成员 (连续数组, z)<br />         z ＝ 0<br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> 数组排序 (连续数组, 假)<br /> <br /> 返回 (连续数组 [1])

aaa88888

Mr、Darren 发表于 2020-4-21 17:38
[e=0].版本 2
.支持库 spec

忘记说了编辑框内容是变动的

Mr、Darren

aaa88888 发表于 2020-4-21 17:40
忘记说了编辑框内容是变动的

上面的文本 你换了就行了啊

补充内容 (2020-4-21 17:42):
文本我也是随便打的

aaa88888

Mr、Darren 发表于 2020-4-21 17:42
上面的文本 你换了就行了啊

补充内容 (2020-4-21 17:42):

判断哪里提示

不能将“文本型 数组”xx转换到“通用型”xx。

Mr、Darren

  

变量名	类 型	静态	数组	备 注
文本	文本型

' 文本 ＝ “你你我你我我我你我我你你你”
调试输出 (取最大出现次数 (编辑框1, “你”)) ' 编辑框1 改成要替换的编辑框组件名称

子程序名	返回值类型	公开	备 注
取最大出现次数	整数型
参数名	类 型	参考	可空	数组	备 注
编辑框	编辑框
被判断文本	文本型

变量名	类 型	静态	数组	备 注
文本数组	文本型		0
i	整数型
连续数组	整数型		0
z	整数型

' 文本_逐字分割 (编辑框, 文本数组)
文本数组 ＝ 分割文本 (编辑框.内容, #换行符, )
计次循环首 (取数组成员数 (文本数组), i)
判断 (文本数组 [i] ＝ 被判断文本)
z ＝ z ＋ 1
加入成员 (连续数组, z)
z ＝ 0

计次循环尾 ()
数组排序 (连续数组, 假)
返回 (连续数组 [1])

.版本 2<br /> <br /> .局部变量 文本, 文本型<br /> <br /> ' 文本 ＝ “你你我你我我我你我我你你你”<br /> 调试输出 (取最大出现次数 (编辑框1, “你”))'编辑框1 改成要替换的编辑框组件名称<br /> <br /> .子程序 取最大出现次数, 整数型<br /> .参数 编辑框, 编辑框<br /> .参数 被判断文本, 文本型<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 连续数组, 整数型, , "0"<br /> .局部变量 z, 整数型<br /> <br /> ' 文本_逐字分割 (编辑框, 文本数组)<br /> 文本数组 ＝ 分割文本 (编辑框.内容, #换行符, )<br /> .计次循环首 (取数组成员数 (文本数组), i)<br />     .判断开始 (文本数组 <i> ＝ 被判断文本)<br />         z ＝ z ＋ 1<br />     .默认<br />         加入成员 (连续数组, z)<br />         z ＝ 0<br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> 数组排序 (连续数组, 假)<br /> <br /> 返回 (连续数组 [1])

这么不会灵活变通?

汉族

加入数组 然后对比 就直知道了

aaa88888

Mr、Darren 发表于 2020-4-21 17:46
[e=0].版本 2

.局部变量 文本, 文本型

提示判断哪里
不能将“文本型 数组”sj转换到“通用型”sj。

aaa88888

汉族 发表于 2020-4-21 17:47
加入数组 然后对比 就直知道了

大佬写一下，，我正在学易