[File] [vb.net] SaveText / 텍스트 문서(txt)로 저장하는 함수
하나를하더라도최선을
2020-01-17 15:01
5,498
0
본문
Function SaveText(fPATH As String, TEXT As String, Optional ED As System.Text.Encoding = Nothing) As Boolean On Error GoTo ErrPass Dim File As System.IO.StreamWriter If ED Is Nothing Then ED = System.Text.Encoding.Default File = My.Computer.FileSystem.OpenTextFileWriter(fPATH, False, ED) '// False = 새로쓰기, True = 이어쓰기 File.WriteLine(TEXT) File.Close() SaveText = True ErrPass: End Function |
댓글목록0