如何在vba中使用Open语句操作文本文件?





vba中内置了很多与文件操作相关的语句或函数。

用vba内置的语句或函数操作文件时,首先需要先用Open语句打开文件。

它的语法如下:

具体的参数说明可以见链接。

比如语句

Open “C:\1.txt” For Binary Access Read As #1

表示以二进制只读方式打开文件C:\1.txt,生成文件号为1。

FreeFile 函数可以返回可供Open语句使用的文件号。

Get语句可以读取Open文件打开的内容到变量中,它的语法如下:

其中参数recnumber表示要开始读取的位置,如果是第一个记录或者第一个字节就是1。

所有用Open语句打开的文件都可以用Close语句关闭,这样可以及时地释放内存以及避免文件号被占用。

如下的代码使用Open语句以二进制只读方式打开文件,并将文本文件的内容读取到变量中:

 

 

发表评论