テキストファイルを読み書きする

 テキストファイルから保存されているデータを読み込んだり、入力したデータを保存したりする方法を見てみましょう。そのための方法はいろいろ用意されていますが、今回は、StreamReader、StreamWriteを使ってみます。

○ プロジェクト

 次のようにプロジェクトを作成してください。

プロジェクトの種類 Windows フォーム アプリケーション
プロジェクト名 FileTest

サンプルダウンロード

○ フォームデザイン

 次の図のようにコントロールを配置してください。

コントロールの配置例
コントロールの配置例

○ プログラム

 次のプログラムを入力してください。

  1. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  2.  Try
  3.   '読み込む準備
  4.   Dim sr As New System.IO.StreamReader("C:¥Work¥sample.txt")
  5.   '読み込む
  6.   Me.TextBox1.Text = sr.ReadToEnd()
  7.   '後始末
  8.   sr.Close()
  9.  Catch ex As Exception
  10.   'エラーメッセージを表示
  11.   MessageBox.Show(ex.Message)
  12.  End Try
  13. End Sub
  14. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
  15.  Try
  16.   '保存する準備
  17.   Dim sw As New System.IO.StreamWriter("C:¥Work¥sample.txt")
  18.   '保存する
  19.   sw.Write(Me.TextBox1.Text)
  20.   '後始末
  21.   sw.Close()
  22.  Catch ex As Exception
  23.   'エラーメッセージを表示
  24.   MessageBox.Show(ex.Message)
  25.  End Try
  26. End Sub

 Try~Catch構文は「Visual Basic 2010によるプログラミング―オブジェクト指向編」で学習します。

○ 実行結果

実行結果
実行結果

○ 解説

 「開く」ボタンで保存したテキストファイルを表示し、「保存」ボタンで表示しているテキストを保存することができます。

前へ