易语言编辑框关键字提取整行

编辑框1输入【每行前几位字】回车-关键字执行自动查找编辑框3-内容反馈到编辑框2【关键字整行】见附件不使用超级编辑框
显示不了.取匹配数量。

输入一个或多个关键字都可以搜索出结果.

再次点击搜索,显示下一个匹配结果.

直到最后一条.

代码:

.版本 2

.子程序 _按钮1_被单击
.局部变量 正则, 正则表达式类
.局部变量 N, 整数型, 静态

.如果真 (编辑框1.内容 = “”)
    返回 ()
.如果真结束

正则.创建 (“.*?” + 编辑框1.内容 + “.*?\n”, 编辑框3.内容)
.判断开始 (正则.取匹配数量 () > 1)
    N = N + 1
    编辑框2.内容 = 正则.取匹配文本 (N)
    .如果真 (N > 正则.取匹配数量 ())
        N = 0
        编辑框2.内容 = “搜索完毕”
    .如果真结束

.默认
    编辑框2.内容 = 正则.取匹配文本 (1)
.判断结束

.如果真 (正则.取匹配数量 () = 0)
    编辑框2.内容 = “没有找到”
.如果真结束


.子程序 _编辑框1_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型

.如果真 (键代码 = #回车键)
    _按钮1_被单击 ()

模块名称:精易模块

请采纳~

追问

错误(36): 找不到指定的对象成员命令名称“取匹配数量”。
编译现行易程序失败或被中止!
冲突了?

错误(36): 找不到指定的对象成员命令名称“取匹配数量”。
编译现行易程序失败或被中止!
冲突了?

温馨提示:答案为网友推荐,仅供参考
相似回答