생성시
Dim f As New System.IO.StreamWriter("xxx.txt", True, System.Text.Encoding.GetEncoding("euc-kr"))
읽을때
Dim Lines() As String = IO.File.ReadAllLines("xxx.txt",, System.Text.Encoding.Default)