
TextStreamオブジェクトのReadメソッドについてです。
Readメソッド
概要
ファイルから指定した文字数を読み取れます。
構文
TextStreamObject.Read(characters)
Readメソッドの引数
引 数 | 必須 / 省略可 | 詳 細 |
文字数 | 必須 | ファイルから読み取る文字数を指定。 |
VBAサンプル
まずFileSystemObjectをセットします。FileSystemObjectのOpenTextFileメソッドでTextStreamオブジェクトをセットして、Readメソッドで文字数を指定して読み取ります。
1 2 3 4 5 6 7 8 9 10 11 12 | Sub test() '変数 Dim fso As Object, ts As Object 'FileSystemObjectをセット Set fso = CreateObject("Scripting.FileSystemObject") 'TextStreamオブジェクトをセット Set ts = fso.OpenTextFile("D:\sample\test.txt", ForReading) 'TextStreamオブジェクトのReadメソッドで5文字読み取る Debug.Print ts.Read(5) End Sub |
【結果】
5文字分の文字を読み取れます。