Use FreeFile : File Utilities « Stream File « VB.Net Tutorial

1. VB.Net Tutorial
2. Stream File
3. File Utilities

Option Strict On

Public Module Checking
   Private Const filename As String = "CheckFile.dat"

   Public Sub Main()
      Dim fn As Integer = FreeFile
      Dim fileOpened As Boolean
      Try
         FileOpen(fn, filename, OpenMode.Append)
         fileOpened = True
         WriteLine(fn, 1605, Date.Now, "Books", 2.19)
      Catch e As Exception
         Console.WriteLine(e.GetType().Name & ": " & e.Message)
      Finally
         If fileOpened Then FileClose(fn)
      End Try
   End Sub
End Module

13.3.File Utilities
	13.3.1.	Copy a file
	13.3.2.	Use the HMACSHA1 hashing function to generate a checksum for a file.
	13.3.3.	Delete a file with kill
	13.3.4.	Delete a file
	13.3.5.	File copy
	13.3.6.	Move a File
	13.3.7.	Move a file with File.Move
	13.3.8.	Use FreeFile
	13.3.9.	Use FreeFile to read a text file