VB 文字列をファイルに保存する

文字列をファイルに保存する

　

１．一般的な例

以下の例では、TextBox1の内容をC:\VBTest.txtに書き込む。

Dim FileName As String = "C:\VBTest.txt"
Dim Writer As IO.StreamWriter
Dim Encode As System.Text.Encoding
'文字コードにShiftJISを指定。(UTF8の場合は指定不要)
Encode = System.Text.Encoding.GetEncoding("Shift-JIS")

'既に存在するテキストに追加する場合は第２引数をTrueにする。
Writer = New IO.StreamWriter(FileName, False, Encode)
Writer.Write(TextBox1.Text)
Writer.Close()

メモ：この例では文字コードはShiftJISになります。WindowsXP以前(日本語版)のメモ帳は標準でShiftJISで読み書きを行います。VBは標準でUTF-8で読み書きを行います。そのためメモ帳で作成したテキストファイルを、VBで文字コードを指定しないで読み込むと文字化けします。

　

２．単純な例

以下の例では、TextBox1の内容をC:\VBTest.txtに書き込む。

'既に存在するテキストに追加する場合は第３引数をTrueにする。
My.Computer.FileSystem.WriteAllText("C:\VBTest.txt", TextBox1.Text, False)
　

メモ：文字コードはUTF-8になります。第４引数で文字コードを指定することもできます。

　VB6ではOpenステートメントとOutputステートメントなどを組み合わせてファイルの書き込みを行います。