马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
代码在下面,请老师们指正
- //========================== 查找文件中字符串所在行 =====================//
- // 对指定文件进行模糊查找指定字串的所在行,并返回
- // 参数一 要获取的字符串 你要在指定文件中查找的字符串
- // 参数二 文件路径(可空) 需要在那个文件中查找,需要输入全路径如:d:\\uesr.txt
- // 返回值 成功返回要查找字符串的所在行,失败返回-1
- 功能 查找文件中字符串所在行(要查找的字符串, 文件路径="")
- 变量 返回值=-1,文件内容, 内容数组, 数组长度
- // 如果传入空参数,使用文件对话框打开
- 如果(文件路径 == "" || 文件路径 == null)
- 调试输出("文件操作.查找文件中字符串所在行->>使用对话框选择文件")
- 文件路径 = 文件.对话框(1)
- 如果结束
- // 判断文件是否存在
- 如果(文件.是否存在(文件路径))
- // 读出文件中的所有内容
- 文件内容 = 文件.读文件(文件路径)
- // 使用\r\n转义字符进行分割,就是一行一回车
- 如果(字符串.分割(文件内容, "\r\n", 内容数组))
- // 使用遍历对整个数组进行扫描
- 数组空间.大小(内容数组, 数组长度)
- 遍历(i=0; i<数组长度; i++)
- // 逐行扫描,找到跳出循环
- 如果(字符串.查找字符串(内容数组[i], 要查找的字符串) != -1)
- 返回值 = i+1
- 跳出
- 如果结束
- 遍历结束
- 如果结束
- 如果结束
- 返回 返回值
- 功能结束
- //========================== 读取文件中的指定行 =============================//
- // 参数一 行号 要读取文件中的那一行
- // 参数二 文件路径(可空) 需要在那个文件中查找,需要输入全路径如:d:\\uesr.txt
- // 返回值 成功返回要查找的字符串, 失败返回空字串
- 功能 读取文件的指定行(行号, 文件路径="")
- 变量 返回值="", 文件内容, 内容数组, 数组长度
- // 参数内容错误直接返回
- 如果(!类型.是否为整型(行号) || 行号 == -1 || 行号 == null)
- 返回 返回值
- 如果结束
- // 如果传入空参数,使用文件对话框打开
- 如果(文件路径 == "" || 文件路径 == null)
- 调试输出("文件操作.读取文件中的指定行->>使用对话框选择文件")
- 文件路径 = 文件.对话框(1)
- 如果结束
- // 判断文件是否存在
- 如果(文件.是否存在(文件路径))
- // 读出文件中的所有内容
- 文件内容 = 文件.读文件(文件路径)
- // 使用\r\n转义字符进行分割,就是一行一回车
- 如果(字符串.分割(文件内容, "\r\n", 内容数组))
- 数组空间.大小(内容数组, 数组长度)
- // 给定的行数是否超出文件行数
- 如果(行号 <= 数组长度)
- // 数组是从0开始的
- 返回值 = 内容数组[行号-1]
- 如果结束
- 如果结束
- 如果结束
- 返回 返回值
- 功能结束
复制代码
|