Siebel VB Language Reference > VB Language Reference >

FreeFile Function

This standard VB function returns the lowest unused file number.

Syntax

FreeFile

Returns

The lowest file number not in use.

Usage

The FreeFile function is used when you need to supply a file number and want to make sure that you are not choosing a file number that is already in use.

The value returned can be used in a subsequent Open statement.

Example

This example opens a file and assigns to it the next file number available.

Sub Button_Click
   Dim filenumber As Integer
   Dim filename As String
   filenumber = FreeFile
   filename = "d:\temp\trace.txt"
   On Error Resume Next
   Open filename For Input As filenumber
   If Err <> 0 then
      Exit Sub
   End If
   Close #filenumber
End Sub

See Also

Open Statement