1. Visual Studio .NET을 엽니다. Visual Basic .NET에서 새 콘솔 응용 프로그램을 만듭니다. 그러면 Visual Studio에서 빈 Main() 프로시저가 있는 모듈을 자동으로 만듭니다.
2. 프로젝트가 System 이름 공간을 참조하는지 확인합니다. System, System.IO 및 System.Collections에 Imports 문을 사용합니다. 그러면 나중에 코드에서 이 이름 공간의 선언을 한정하지 않아도 됩니다. 이 명령문은 항상 선언 앞에 사용해야 합니다.

   Imports System
   Imports System.IO
   Imports System.Collections

3. 읽을 파일을 열기 위해 StreamReader 개체의 새 인스턴스를 만들고 다음과 같이 해당 파일의 경로를 생성자에게 전달합니다.

   Dim objReader As New StreamReader("c:\test.txt")

4. 처리하는 동안 파일의 각 행을 저장할 문자열 변수가 필요합니다. 이 행을 ArrayList에 추가할 것이므로 이러한 유형의 개체도 선언하고 만듭니다.

   Dim sLine As String = ""
   Dim arrText As New ArrayList()

5. 전체 파일을 한꺼번에 읽는 ReadToEnd 메서드를 비롯하여 파일을 읽을 수 있는 방법에는 여러 가지가 있습니다. 하지만 이 예에서는 ReadLine 메서드를 사용하여 파일을 한번에 한 행씩 불러올 수 있습니다. 파일 끝에 도달했을 때, 이 메서드는 루프를 종료할 수 있는 "Nothing"을 반환합니다. 파일의 각 행을 읽는 동안 ArrayList의 Add 메서드를 사용하여 해당 행을 ArrayList 클래스에 삽입할 수 있습니다.

   Do
       sLine = objReader.ReadLine()
       If Not sLine Is Nothing Then
           arrText.Add(sLine)
       End If
   Loop Until sLine Is Nothing
   objReader.Close()

6. 다음과 같이 "For Each" 루프를 사용하여 새로 채운 ArrayList의 내용을 콘솔에 표시합니다.

   For Each sLine In arrText
       Console.WriteLine(sLine)
   Next
   Console.ReadLine()

7. 코드를 저장하고 실행합니다. 그러면 파일이 콘솔에 나열됩니다.

전체 코드 예제

Imports System
Imports System.IO
Imports System.Collections

Module Module1

    Sub Main()
        Dim objReader As New StreamReader("c:\test.txt")
        Dim sLine As String = ""
        Dim arrText As New ArrayList()

        Do
            sLine = objReader.ReadLine()
            If Not sLine Is Nothing Then
                arrText.Add(sLine)
            End If
        Loop Until sLine Is Nothing
        objReader.Close()

        For Each sLine In arrText
            Console.WriteLine(sLine)
        Next
        Console.ReadLine()
    End Sub

End Module

주의 사항

• 읽거나 쓸 파일에 액세스할 때 해당 파일이 시스템에 없거나 이미 사용되고 있을 수 있습니다.
• 이 예에서는 파일을 처리하기 전에 전체 파일을 메모리로 읽어들입니다. 파일이 너무 커서 메모리에 저장할 수 없거나 해당 파일에 대한 액세스 권한이 없을 수 있습니다.

참조

http://msdn.microsoft.com/ko-kr/library/ms229335(v=vs.90).aspx