继续分享两个文件操作的封装方法

yfsoft

代码在下面,请老师们指正

1. //========================== 查找文件中字符串所在行 =====================//
   
2. // 对指定文件进行模糊查找指定字串的所在行,并返回
   
3. // 参数一 要获取的字符串 你要在指定文件中查找的字符串
   
4. // 参数二 文件路径(可空) 需要在那个文件中查找,需要输入全路径如:d:\\uesr.txt
   
5. // 返回值 成功返回要查找字符串的所在行,失败返回-1
   
6. 功能 查找文件中字符串所在行(要查找的字符串, 文件路径="")
   
7.     变量 返回值=-1,文件内容, 内容数组, 数组长度
   
8.     // 如果传入空参数,使用文件对话框打开
   
9.     如果(文件路径 == "" || 文件路径 == null)
   
10.         调试输出("文件操作.查找文件中字符串所在行->>使用对话框选择文件")
    
11.         文件路径 = 文件.对话框(1)
    
12.     如果结束
    
13.     // 判断文件是否存在
    
14.     如果(文件.是否存在(文件路径))
    
15.         // 读出文件中的所有内容
    
16.         文件内容 = 文件.读文件(文件路径)
    
17.         // 使用\r\n转义字符进行分割,就是一行一回车
    
18.         如果(字符串.分割(文件内容, "\r\n", 内容数组))
    
19.             // 使用遍历对整个数组进行扫描
    
20.             数组空间.大小(内容数组, 数组长度)
    
21.             遍历(i=0; i<数组长度; i++)
    
22.                 // 逐行扫描,找到跳出循环
    
23.                 如果(字符串.查找字符串(内容数组[i], 要查找的字符串) != -1)
    
24.                     返回值 = i+1
    
25.                     跳出
    
26.                 如果结束
    
27.             遍历结束
    
28.         如果结束
    
29.     如果结束
    
30.     返回 返回值
    
31. 功能结束
    
32. //========================== 读取文件中的指定行 =============================//
    
33. // 参数一 行号 要读取文件中的那一行
    
34. // 参数二 文件路径(可空) 需要在那个文件中查找,需要输入全路径如:d:\\uesr.txt
    
35. // 返回值 成功返回要查找的字符串, 失败返回空字串
    
36. 功能 读取文件的指定行(行号, 文件路径="")
    
37.     变量 返回值="", 文件内容, 内容数组, 数组长度
    
38.     // 参数内容错误直接返回
    
39.     如果(!类型.是否为整型(行号) || 行号 == -1 || 行号 == null)
    
40.         返回 返回值
    
41.     如果结束
    
42.     // 如果传入空参数,使用文件对话框打开
    
43.     如果(文件路径 == "" || 文件路径 == null)
    
44.         调试输出("文件操作.读取文件中的指定行->>使用对话框选择文件")
    
45.         文件路径 = 文件.对话框(1)
    
46.     如果结束
    
47.     // 判断文件是否存在
    
48.     如果(文件.是否存在(文件路径))
    
49.         // 读出文件中的所有内容
    
50.         文件内容 = 文件.读文件(文件路径)
    
51.         // 使用\r\n转义字符进行分割,就是一行一回车
    
52.         如果(字符串.分割(文件内容, "\r\n", 内容数组))
    
53.             数组空间.大小(内容数组, 数组长度)
    
54.             // 给定的行数是否超出文件行数
    
55.             如果(行号 <= 数组长度)
    
56.                 // 数组是从0开始的
    
57.                 返回值 = 内容数组[行号-1]
    
58.             如果结束
    
59.         如果结束
    
60.     如果结束
    
61.     返回 返回值
    
62. 功能结束

复制代码