Use FreeFile to read a text file : File Utilities « Stream File « VB.Net Tutorial






public class Test

   public Shared Sub Main
        Dim file_num As Integer = FreeFile()

        Dim file_name As String = "test.txt"
        FileOpen(file_num, file_name, OpenMode.Input, OpenAccess.Read, OpenShare.Shared)

        Do While Not EOF(file_num)
            Dim txt As String = LineInput(file_num)
            Console.WriteLine(txt)
        Loop

        FileClose(file_num)

   End Sub
End class








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 copyFile 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