連載 プロフェッショナルVB.NETプログラミング ――　VB 6プログラマーのためのVB.NET入門　―― 第8回 ファイル入出力（後編） （株）ピーデー 川俣 晶 2002/06/08

---

.NET Frameworkクラス・ライブラリを用いたテキスト・ファイルの入出力

　前回の記事で、VB.NET（Visual Basic .NET）でファイル入出力を行う方法として、入出力ステートメント（VB.NETではVB専用関数）を用いる方法と、ファイル・システム・オブジェクトを使用する方法をご紹介したが、それとは別に、.NET Frameworkのクラス・ライブラリを用いる方法がある。さっそく、前回と同じような内容を、これを用いて記述した例を以下に示す。

1: Imports System.IO   2:   3: Public Class Form1   4:   Inherits System.Windows.Forms.Form   5:   6: #Region " Windows フォーム デザイナで生成されたコード "   7:   8:   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load   9:     Dim writer As StreamWriter, reader As StreamReader  10:     writer = New StreamWriter("c:\test.txt")  11:     writer.Write("Test")  12:     writer.WriteLine(" Data")  13:     writer.WriteLine("テストデータ")  14:     writer.Write("ファイル番号は")  15:     writer.WriteLine("使用していません")  16:     writer.WriteLine("A" & Space(1) & "B" & Space(5) & "C")  17:     writer.WriteLine(True & "," & False)  18:     writer.WriteLine(Today)  19:     writer.Close()  20:  21:     reader = New StreamReader("c:\test.txt")  22:     Do  23:       Dim s As String  24:       s = reader.ReadLine()  25:       If s = Nothing Then Exit Do  26:       Trace.WriteLine(s)  27:     Loop  28:     reader.Close()  29:   End Sub  30: End Class

.NET Frameworkのクラス・ライブラリを用いてファイル入出力を行うVB.NETのサンプル・プログラム1

　これを実行すると以下のようになる。

1: Test Data  2: テストデータ  3: ファイル番号は使用していません  4: A B     C  5: True,False  6: 2002/05/03 0:00:00

サンプル・プログラム1の実行結果

　ソース・コードを説明しよう。まず、1行目で、「Imports System.IO」としているのは、クラス・ライブラリにある多数のクラスの中で、“System.IO”という名前空間に属するクラスを、前置きなしにソース中に記述するという意図を指示するものである。このような記述を行わなくても、クラス名として名前空間を含むフルネームを記述すれば利用できるのだが、そうすると名前が長くなりすぎてソースが見にくくなるので、このような機能を利用することが多い。

　さて、実際に、この名前空間に含まれているStreamWriterクラスと、StreamReaderクラスをこのソースでは利用している。この2つは、9行目のDim文で普通のVB.NETのクラスのように利用しているが、クラス・ライブラリ内のクラスも、VB.NETで記述したクラスも、機能的に同等なので、同じようなものとして扱って問題ない。

　StreamWriterクラスは、ファイルなどにテキスト・データを出力するために使用される。StreamReaderクラスはファイルなどからテキスト・データを入力するために使用される。どちらもオブジェクトをNewキーワードで生成するときに、ファイル名を指定してやると、それを対象として機能する。Newキーワードで生成するときにはほかにも多くの指定が可能だが、ここでは説明を割愛する。そして、StreamWriterクラスは、データを文字列として出力するWriteメソッドと出力後に改行するWriteLineメソッドなどを持つ。SreamReaderクラスは、テキスト・ファイルから1行入力するReadLineメソッドなどを持つ。どちらのクラスもファイルを閉じるCloseメソッドも持っている。これらを使うことで、テキスト・ファイルの入出力が実現できる。

　若干補足すると、WriteとWriteLineメソッドは、任意のオブジェクトを引数に記述できるが、これらは自動的に文字列に変換されて出力される。ReadLineメソッドは、ファイルの最後を越えて読み出そうとすると、Nothing値を返してくるので、これでファイルの末尾を判定することができる。

　さて、実行結果を見ると、うまく動作しているように見える。だが、このプログラムが作成したデータ・ファイルをテキスト・エディタ（秀丸など）で開いてみると、そんな単純な話ではないことが分かるだろう。以下は秀丸で開いてみた場合である（設定によってはこれと異なる結果になる可能性もある）。

サンプル・プログラム1が出力したデータ・ファイルをテキスト・エディタで開いた例

　見てのとおり、日本語の文字がすべて化けてしまっている。その理由は、.NET Frameworkのクラス・ライブラリでは、何も指定しなければ自動的に文字エンコーディングとして、「UTF-8」が使用されるという仕様による。従来のVB 6（Visual Basic 6.0）や、VB.NETのVB専用関数、ファイル・システム・オブジェクトなどは、何も指定しなければ、その環境のデフォルト、日本では通常「シフトJIS」を使用することになっている。

　日本では、文字は何もかもシフトJISで記述されていると思い込んでいるプログラマーも多いが、実際には世の中に多くの種類の表現方法（エンコーディング）が存在し、それらは相互に互換性がない。そして、そのような互換性のない多くの方法が存在することはデメリットが大きいため、インターネットを中心にUTF-8に統一していこうという動きがある。.NET Frameworkは、まさにその最も先進的な動きを自ら取り込んだ新しいソフトであるため、デフォルトはUTF-8となっている。

　シフトJISの時代には、日本語対応のパソコンで作成したデータを他国に持っていくと文字化けしてしまうという事態も起きたが、UTF-8を用いれば、日本語フォントがないため表示できない事態はあるかもしれないが、文字の種類を誤って判断されることはなくなるため、システムが別の文字と誤認する危険はなくなる。

　このことから当然予測できるように、秀丸のようなテキスト・エディタでこのファイルを正しく開くには、文字コードとしてUTF-8を指定して開けばよい。

文字コードとして“UTF-8”を指定してデータ・ファイルを開いた例

　これからは、UTF-8が主流になっていくことは間違いなく、VB.NETで記述されたアプリケーション・ソフトによって出力されるファイルがUTF-8で記述されていることも珍しくはなくなるだろう。

　UTF-8のことを詳しく知りたいという方には、以下の本を推薦しておく。

『Unicode標準入門』
Tony Graham著／関口正裕 監修／乾和志、海老塚徹 訳、翔泳社発行、ISBN4-7981-0030-7、3800円

INDEX
	連載 プロフェッショナルVB.NETプログラミング
	第8回 ファイル入出力（後編）
	1．.NET Frameworkクラス・ライブラリを用いたテキスト・ファイルの入出力
	2．エンコーディング名を指定したテキスト・ファイルの入出力
	3．テキスト・ファイルの書き込み位置

　

「プロフェッショナルVB.NETプログラミング」

＠ITメールマガジン　新着情報やスタッフのコラムがメールで届きます（無料）