VBA读取文本文件

来源:互联网 发布:案例1观一叶可否知秋 编辑:程序博客网 时间:2024/05/28 20:18

文本文件读取处理:

‘1,文件读入到内存中

Open filePath For Input As #1

’2,对内存中的数据利用对应字符集进行解析到字符串(即文本文件被转化为一个字符串变量)

'txtContent = Trim(StrConv(InputB(LOF(1), 1), vbUnicode))

’副2,对内存中的数据利用对应字符集进行解析,利用回车换行符进行split即可得到字符串数组(即文本文件被转化为一个字符串数组)

contentArr = Split(StrConv(InputB(LOF(1), 1), vbUnicode), vbCrLf)
Close #1
原创粉丝点击