TextStream ファイルを読み込む(Read,ReadLine,ReadAll)
ReadAll メソッド
TextStream ファイルの内容全体を取得します。
<取得>
object.ReadAll メソッド
引数・戻り値
- object ・・・ TextStream オブジェクトを指定します。
ReadLine メソッド
TextStream ファイルから1行(改行文字の手前まで)を取得します。
<取得>
object.ReadLine
引数・戻り値
- object ・・・ TextStream オブジェクトを指定します。
Read メソッド
TextStream ファイルから指定した文字数を読み取って、その内容(文字列)を返します。
<取得>
object.Read ( characters )
引数・戻り値
- object ・・・ TextStream オブジェクトを指定します。
- characters ・・・ 読み取る文字数を指定します。
Read メソッド、ReadLine メソッド、ReadAll メソッド 使用例
サンプルVBAソース 1
1 2 3 4 5 6 7 8 9 10 11 12 |
Sub Sample_ReadAll() Dim fso As New FileSystemObject Dim f As TextStream Set f = fso.OpenTextFile("C:\Documents\mydata5\test01.txt") MsgBox f.ReadAll f.Close End Sub |
実行結果
サンプルVBAソース 2
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Sub Sample_ReadLine() Dim fso As New FileSystemObject Dim f As TextStream Dim str As String Set f = fso.OpenTextFile("C:\Documents\mydata5\test01.txt") Do Until f.AtEndOfLine str = str & f.ReadLine & vbCrLf Loop f.Close MsgBox str End Sub |
実行結果
サンプルVBAソース 3
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Sub Sample_Read() Dim fso As New FileSystemObject Dim f As TextStream Dim str As String Set f = fso.OpenTextFile("C:\Documents\mydata5\test01.txt") Do Until f.AtEndOfStream str = str & f.Read(1) Loop f.Close MsgBox str End Sub |
実行結果
関連記事
-
-
FileSystemObject:フォルダやファイルを移動(Move メソッド)
フォルダやファイルを移動(Move メソッド) FileSystemObject …
-
-
FileSystemObject:ファイル・フォルダを削除する(DeleteFile メソッド,DeleteFolder メソッド)
ファイルを削除する(DeleteFile メソッド) FileSystemObj …
-
-
FileSystemObject:ファイル・フォルダの属性を取得または設定(Attributes プロパティ)
ファイル・フォルダの属性を取得または設定(Attributes プロパティ) フ …
-
-
ファイルシステムオブジェクト(FileSystemObject)の使い方
ファイルシステムオブジェクト(FileSystemObject) FileSys …
-
-
FileSystemObject:フォルダやファイルの種類を調べる(Type プロパティ)
フォルダやファイルの種類を取得(Type プロパティ) FileSystemOb …
-
-
FileSystemObject:フォルダの作成(CreateFolder メソッド)
フォルダの作成(CreateFolder メソッド) FileSystemObj …
-
-
FileSystemObject:Folder オブジェクトの取得
Folder オブジェクトの取得 Folder オブジェクト を取得するには、F …
-
-
FileSystemObject:ファイルやフォルダの親フォルダを調べる(ParentFolder プロパティ)
指定したファイルやフォルダの親フォルダを調べる(ParentFolder プロパ …
-
-
TextStream ファイルの位置(AtEndOfLine,AtEndOfStream,Column,Line)
AtEndOfLine プロパティ 開いたファイル(TextStream ファイ …
-
-
FileSystemObject:ファイル・フォルダの最終更新日時を取得(DateLastModified プロパティ)
ファイル・フォルダの最終更新日時を取得(DateLastModified プロパ …