BUG_文本_取出现次数

wangqiang5629

1.模块版本：5.20
2.所用系统：WIN7 64
3.命令名称：文本_取出现次数

4.BUG描述：假死状态

5.我的联系QQ：562945724

  
子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行
变量名	类 型	静态	数组	备 注
文本1	文本型
文本2	文本型
文本1 ＝ “15615,84894,7456,12,48,52”
文本2 ＝ “”
调试输出 (文本_取出现次数_改进 (文本1, 文本2))
调试输出 (文本_取出现次数 (文本1, 文本2))  ' 此处会出现假死
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
文本_取出现次数_改进	整数型
参数名	类 型	参考	可空	数组	备 注
被搜索文本	文本型
欲搜索文本	文本型
是否区分大小写	逻辑型
变量名	类 型	静态	数组	备 注
位置_	整数型			感谢论坛会员 Mr.Yang提供的代码
i2	整数型
如果真 (欲搜索文本 ＝ “”)
返回 (0)
位置_ ＝ 寻找文本 (被搜索文本, 欲搜索文本, , 取反 (是否区分大小写))
判断循环首 (位置_ ≠ -1)
i2 ＝ i2 ＋ 1
位置_ ＝ 寻找文本 (被搜索文本, 欲搜索文本, 位置_ ＋ 取文本长度 (欲搜索文本), 取反 (是否区分大小写))
判断循环尾 ()
返回 (i2)

子程序名	返回值类型	公开	备 注
文本_取出现次数	整数型
参数名	类 型	参考	可空	数组	备 注
被搜索文本	文本型
欲搜索文本	文本型
是否区分大小写	逻辑型
变量名	类 型	静态	数组	备 注
位置_	整数型			感谢论坛会员 Mr.Yang提供的代码
i2	整数型
位置_ ＝ 寻找文本 (被搜索文本, 欲搜索文本, , 取反 (是否区分大小写))
判断循环首 (位置_ ≠ -1)
i2 ＝ i2 ＋ 1
位置_ ＝ 寻找文本 (被搜索文本, 欲搜索文本, 位置_ ＋ 取文本长度 (欲搜索文本), 取反 (是否区分大小写))
判断循环尾 ()
返回 (i2)



i支持库列表	支持库注释
spec	特殊功能支持库
.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 文本1, 文本型<br /> .局部变量 文本2, 文本型<br /> <br /> 文本1 ＝ “15615,84894,7456,12,48,52”<br /> 文本2 ＝ “”<br /> 调试输出 (文本_取出现次数_改进 (文本1, 文本2))<br /> 调试输出 (文本_取出现次数 (文本1, 文本2))  ' 此处会出现假死<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 文本_取出现次数_改进, 整数型<br /> .参数 被搜索文本, 文本型<br /> .参数 欲搜索文本, 文本型<br /> .参数 是否区分大小写, 逻辑型, 可空<br /> .局部变量 位置_, 整数型, , , 感谢论坛会员 Mr.Yang提供的代码<br /> .局部变量 i2, 整数型<br /> <br /> .如果真 (欲搜索文本 ＝ “”)<br />     返回 (0)<br /> .如果真结束<br /> 位置_ ＝ 寻找文本 (被搜索文本, 欲搜索文本, , 取反 (是否区分大小写))<br /> .判断循环首 (位置_ ≠ -1)<br />     i2 ＝ i2 ＋ 1<br />     位置_ ＝ 寻找文本 (被搜索文本, 欲搜索文本, 位置_ ＋ 取文本长度 (欲搜索文本), 取反 (是否区分大小写))<br /> .判断循环尾 ()<br /> 返回 (i2)<br /> <br /> .子程序 文本_取出现次数, 整数型<br /> .参数 被搜索文本, 文本型<br /> .参数 欲搜索文本, 文本型<br /> .参数 是否区分大小写, 逻辑型, 可空<br /> .局部变量 位置_, 整数型, , , 感谢论坛会员 Mr.Yang提供的代码<br /> .局部变量 i2, 整数型<br /> <br /> 位置_ ＝ 寻找文本 (被搜索文本, 欲搜索文本, , 取反 (是否区分大小写))<br /> .判断循环首 (位置_ ≠ -1)<br />     i2 ＝ i2 ＋ 1<br />     位置_ ＝ 寻找文本 (被搜索文本, 欲搜索文本, 位置_ ＋ 取文本长度 (欲搜索文本), 取反 (是否区分大小写))<br /> .判断循环尾 ()<br /> 返回 (i2)

春阳谈金

御风软件

囧，故意传人错误的参数，命令，当然运行异常了

人善帝王心

判断循环首 内加个处理事件就行了

wangqiang5629

附件在这