易语言

关注公众号 jb51net

关闭
首页 > 软件编程 > 易语言 > 超级编辑框中寻找指定文本

易语言超级编辑框中寻找指定文本并选中的示例

作者:易语言源码教程

今天小编就为大家分享一篇关于易语言超级编辑框中寻找指定文本并选中的示例,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧

超级编辑框中寻找指定文本并选中

.版本 2
.支持库 iext2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.子程序 取字符数, 整数型
.参数 文本, 文本型
.局部变量 长度, 整数型
.局部变量 个数, 整数型
.局部变量 字符位置, 整数型
长度 = 取文本长度 (文本)
个数 = 长度
字符位置 = 1
.判断循环首 (字符位置 < 长度)
  .如果 (取代码 (取文本中间 (文本, 字符位置, 1), ) < 0 或 取代码 (取文本中间 (文本, 字符位置, 1), ) = 13)
    个数 = 个数 - 1
    字符位置 = 字符位置 + 2
  .否则
    字符位置 = 字符位置 + 1
  .如果结束
.判断循环尾 ()
返回 (个数)
.子程序 _按钮_寻找文本_被单击
.局部变量 字符位置, 整数型
.局部变量 文本, 文本型
超级编辑框_文本.获取焦点 ()
字符位置 = 寻找文本 (超级编辑框_文本.内容, 编辑框_输入要寻找的文本.内容, , 假)
.如果真 (字符位置 ≠ -1)
  文本 = 取文本左边 (超级编辑框_文本.内容, 字符位置 - 1)
  超级编辑框_文本.起始选择位置 = 取字符数 (文本)
  超级编辑框_文本.被选择字符数 = 取字符数 (编辑框_输入要寻找的文本.内容)
.如果真结束

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对脚本之家的支持。如果你想了解更多相关内容请查看下面相关链接

您可能感兴趣的文章:
阅读全文