嗯。。。好吧。。。来说说查找文本,顺便说下,这是我先写WORD里然后复制到论坛的,不是从其他地方复制过来打上原创标签的。。。
对于查找文本,易语言本身就提供了一个很方便的函数:寻找文本。
首先来看看这个函数的说明。
调用格式: 〈整数型〉 寻找文本 (文本型 被搜寻的文本,文本型 欲寻找的文本,[整数型起始搜寻位置],逻辑型 是否不区分大小写) - 系统核心支持库->文本操作
英文名称:InStr
返回一个整数值,指定一文本在另一文本中最先出现的位置,位置值从 1 开始。如果未找到,返回-1。本命令为初级命令。
参数<1>的名称为“被搜寻的文本”,类型为“文本型(text)”。
参数<2>的名称为“欲寻找的文本”,类型为“文本型(text)”。
参数<3>的名称为“起始搜寻位置”,类型为“整数型(int)”,可以被省略。位置值从 1 开始。如果本参数被省略,默认为 1 。
参数<4>的名称为“是否不区分大小写”,类型为“逻辑型(bool)”,初始值为“假”。为真不区分大小写,为假区分。
首先,第一个参数是说你要在这个文本里寻找内容。
第二个参数是说你要寻找那个内容
第三个是说从哪里开始找,用来实现“寻找下一个”
第四个。。。只要你懂中国字就明白
这里我就不弄一个专门窗口了,直接弄个输入框就OK。
.版本 2
.子程序 _寻找_被选择
.局部变量 局部_要搜寻文本, 文本型
.局部变量 局部_返回值, 逻辑型
.局部变量 局部_找到位置, 整数型
局部_返回值 = 输入框 (“请输入要寻找的文本”, “寻找文本”, 局部_要搜寻文本, 局部_要搜寻文本, 1)
.如果真 (局部_返回值 ≠ 假)
局部_找到位置 = 寻找文本 (编辑框1.内容, 局部_要搜寻文本, 1, 假)
.如果 (局部_找到位置 ≠ -1)
编辑框1.起始选择位置 = 局部_找到位置
编辑框1.被选择字符数 = 取文本长度 (局部_要搜寻文本)
.否则
信息框 (“没有找到指定内容”, 0, )
.如果结束
.如果真结束
嗯,首先,弹出一个输入框来让用户输入要查找的内容,并且获取其返回值,要知道返回值的用处,就先来看看输入框的说明。
调用格式: 〈逻辑型〉 输入框 ([文本型 提示信息],[文本型 窗口标题],[文本型初始文本],通用型变量 存放输入内容的变量,[整数型 输入方式]) - 系统核心支持库->系统处理
英文名称:InputBox
在一对话框中显示提示,等待用户输入正文并按下按钮。如果用户在确认输入后(按下“确认输入”按钮或回车键)退出,返回真,否则返回假。本命令为初级命令。
参数<1>的名称为“提示信息”,类型为“文本型(text)”,可以被省略。如果提示信息包含多行,可在各行之间用回车符 (即“字符 (13)”)、换行符 (即“字符 (10)”) 或回车换行符的组合 (即:“字符 (13) + 字符 (10)”) 来分隔。如果提示信息太长或行数过多,超过部分将不会被显示出来。
参数<2>的名称为“窗口标题”,类型为“文本型(text)”,可以被省略。参数值指定显示在对话框标题栏中的文本。如果省略,默认为文本“请输入:”。
参数<3>的名称为“初始文本”,类型为“文本型(text)”,可以被省略。参数值指定初始设置到对话框输入文本框中的内容。
参数<4>的名称为“存放输入内容的变量”,类型为“通用型(all)”,提供参数数据时只能提供变量。参数值所指定的变量可以为数值或文本型,用于以不同的数据类型取回输入内容。
参数<5>的名称为“输入方式”,类型为“整数型(int)”,可以被省略。参数值可以为以下常量值: 1、#输入文本; 2、#输入整数; 3、#输入小数; 4、#输入密码。如果省略本参数,默认为“#输入文本”。
可以看出,当用户是直接关闭输入框时,他会返回假,所以就需要先判断是否为假,才能确定要不要搜索。
之后,开始搜索,寻找文本会返回这个内容在文本内出现的位置,之后只需要设置起始选择位置和被选择字符数就OK。
这里只说单独搜索一次的,要实现“寻找下一个”,只需要修改第三个参数:“起始搜寻位置”就OK。
今天就先写这么多。。。刚从书店回来,买了点中考题,做题去了。。。