窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 搜索关键词 | 文本型 | | | 搜索结果 | 文本型 | | |
搜索关键词 = 编辑框1.内容 关键词长度 >= 2时进行实时搜索 如果 (取文本长度 (搜索关键词 ) >= 2 ) 则 搜索结果 = 执行模糊搜索 (搜索关键词 )编辑框2.内容 = 搜索结果 否则 编辑框2.内容 = “请输入至少2个字符进行搜索...”结束如果 变量名 | 类 型 | 静态 | 数组 | 备 注 | 搜索关键词 | 文本型 | | | 搜索结果 | 文本型 | | |
搜索关键词 = 编辑框1.内容 检查关键词是否为空 如果 (取文本长度 (搜索关键词 ) = 0 ) 则 信息框 (“请输入搜索关键词!”, 0, “提示”, )返回 ()结束如果 搜索结果 = 执行模糊搜索 (搜索关键词 )显示搜索结果 编辑框2.内容 = 搜索结果 清空两个编辑框内容 编辑框1.内容 = “”编辑框2.内容 = “”设置焦点到编辑框1 编辑框1. 获取焦点 ()编辑框2内容改变事件(可根据需要添加功能) 变量名 | 类 型 | 静态 | 数组 | 备 注 | 文件路径 | 文本型 | | | 文件内容 | 文本型 | | | 行数组 | 文本型 | | 0 | 匹配结果 | 文本型 | | | i | 整数型 | | | 当前行 | 文本型 | | | 匹配计数 | 整数型 | | |
设置要搜索的文件路径 文件路径 = “BMW ECU ID.txt”检查文件是否存在 如果 (文件是否存在 (文件路径 ) = 假) 则 返回 (“错误:找不到搜索文件!” + #换行符 + “文件路径:” + 文件路径 )结束如果 读取文件内容 文件内容 = 读入文件 (文件路径 )如果文件为空 如果 (取文本长度 (文件内容 ) = 0 ) 则 返回 (“文件内容为空。”)结束如果 按行分割文件内容 行数组 = 分割文本 (文件内容, #换行符, )初始化匹配结果 匹配结果 = “找到 ” + 到文本 (取数组成员数 (行数组 )) + “ 行,匹配 ” + 关键词 + “ 的结果:” + #换行符 + #换行符 匹配计数 = 0 遍历每一行进行模糊匹配 对于 (i = 0; i < 取数组成员数 (行数组 ); i + 1 )当前行 = 行数组 [i ]不区分大小写的模糊匹配 如果 (寻找文本 (当前行, 关键词, 0, 假) > 0 ) 则 匹配计数 = 匹配计数 + 1 匹配结果 = 匹配结果 + “[” + 到文本 (i + 1 ) + “] ” + 当前行 + #换行符 结束如果 结束循环 添加统计信息 如果 (匹配计数 = 0 ) 则 匹配结果 = “未找到匹配 '” + 关键词 + “' 的内容。”否则 匹配结果 = 匹配结果 + #换行符 + “共找到 ” + 到文本 (匹配计数 ) + “ 处匹配内容。”结束如果 返回 (匹配结果 )
|