[TIP] [.NET] 비주얼베이직에서 Binary 파일 입/출력

일반 토론 [TIP] [.NET] 비주얼베이직에서 Binary 파일 입/출력

  • 2012년 4월 2일 월요일 오후 12:56
     
     

    안녕하세요^^
    요즈음 잘 지내시죠?

    개인적으로 저는 6.0 버전에서 Binary 방식을 좋아했었는데요, 어느정도 파일이 가려지는게 신기해서 그랬을지도
    모르네요^^
    저만의 파일이라는 생각도 들었구...(초딩때였으니...)

    그러다가 얼마전에 MSDN 을 뒤지다가 StreamWriter 가 아닌 BinaryWriter  라는 것을 발견했습니다.
    이제 어떻게 BinaryWriter 를 쓰는지 알아보겠습니다...

    Imports System.IO 'BinaryWriter가 있는 네임스페이스

    Private Sub 파일저장()
         Dim BW As BinaryWriter = New BinaryWriter(File.Open("C:\Hello.BCU",Filemode.CreateNew))
        
    'BW 라는 BinaryWriter 객체 선언
         BW.Write("쓸 내용") 'String 형의 데이터를 씁니다.
         BW.Write(True/False) 'Boolean 형의 데이터를 씁니다.
        
    BW.Write(00000) 'Integer 형의 데이터를 씁니다.
        
    BW.Flush '쓰기 버퍼의 내용 삭제
        
    BW.Close '파일을 닫는다.
    End Sub
    Private Sub 파일열기()
         Dim BR As BinaryReader = New BinaryWriter(File.Open("C:\Hello.BCU",Filemode.Open))
         Dim 문자열 As String
         Dim Bool As Boolean
         문자열 = BR.ReadString 'String 형 데이터만 읽음
         Bool = BR.ReadBoolean 'Boolean 형 데이터만 읽음
         BR.Close
    End Sub

    여담으로, 이 때, BW(BinaryWriter)라는 객체를 초기화 시킬 때, 마지막 괄호에 encoding 을 넣으실 수도
    있습니다.

    ex)
    Dim BW As BinaryWriter = New BinaryWriter(File.Open("C:\Hello.BCU",Filemode.CreateNew),encoding.Unicode)

    마지막으로 인코딩 종류의 경우 Unicode, UTF32/7/8, ASCII 등이 있습니다...




    • 편집됨 devlife 2012년 4월 2일 월요일 오후 12:57
    • 편집됨 devlife 2012년 4월 2일 월요일 오후 12:58
    • 편집됨 Jina LeeModerator 2012년 4월 3일 화요일 오전 9:16 제목 변경
    •