大众计算机学习网

专门提供各种电脑教程

vba FreeFile的使用

Admin | 2013-1-4 8:12:35 | 被阅次数 | 9695

  在VBA中,我们可以使用FreeFile函数来取得文件的序号。

  一、FreeFile理论介绍

  该函数的功能是:文件序号的取得。

  Open方法中,如果打开一个被使用的文件,会出错误,使用FreeFile,可以避免这样的错误发生。

  语法如下:

  FreeFile(num)

  参数介绍:

  num,0或者1指定可能

  Open方法时使用,取得使用可能的文件序号。

  参数num=0,返回1~255范围内文件序号。

  参数num=1,返回256~511范围内文件序号。

  二、FreeFile在VBA中的使用

  Dim n As Integer, m As Integer, buf As String
  n = FreeFile                            '返回1
  Open c:\autoexec.bat For Input As n
        Line Input #n, buf
        m = FreeFile                        '返回2
        Open E:\dzwebs.txt For Output As m
            Print #m, buf
        Close m
  Close n

  想使用如上的FreeFile函数,你得有VBA基础知识,如果看不明白什么的,请到本站参阅相关的文章。