LineInput 関数
更新 : 2007 年 11 月
シーケンシャル入力モードで開いたファイルから行全体を読み込み、文字列型 (String) の変数に代入します。
Public Function LineInput(ByVal FileNumber As Integer) As String
パラメータ
- FileNumber
必ず指定します。有効なファイル番号です。
例外
例外の種類 |
エラー番号 |
条件 |
---|---|---|
ファイルの終端に達しました。 |
||
FileNumber が存在していません。 |
非構造化エラー処理を使用する Visual Basic 6.0 アプリケーションをアップグレードする場合は、"エラー番号" の列を参照してください(エラー番号を Number プロパティ (Err オブジェクト) と比較することもできます)。ただし、可能であれば、このようなエラー制御は Visual Basic の構造化例外処理の概要 に置き換えることを検討してください。
解説
LineInput 関数は、下位互換性を保つために提供されており、パフォーマンスに影響を与える可能性があります。非レガシ アプリケーションに対しては、My.Computer.FileSystem オブジェクトを使用した方が、パフォーマンスが高くなります。詳細については、「Visual Basic におけるファイル アクセス」を参照してください。
通常、LineInput 関数を使用して読み込んだデータは Print 関数を使用して書き込みます。
セキュリティに関するメモ : |
---|
ファイルからデータを読み取るときは、ファイル名の拡張子に基づいてファイルの内容を判断しないでください。たとえば、Form1.vb という名前のファイルが Visual Basic のソース ファイルとは限りません。 |
LineInput 関数は、キャリッジ リターン (Chr(13)) またはキャリッジ リターンとライン フィード (Chr(13) + Chr(10)) が見つかるまで、ファイルから一度に 1 文字ずつ読み込みます。キャリッジ リターンとライン フィードは、文字列に追加されるのではなく、読み飛ばされます。
セキュリティに関するメモ : |
---|
LineInput 関数を使ってファイルを読み込むには、FileIOPermissionAccess 列挙体の Read アクセスが必要です。 |
使用例
LineInput 関数を使って、シーケンシャル ファイルから 1 行ずつ読み込んで変数に代入する例を次に示します。TestFile は、複数行のサンプル データを含むテキスト ファイルと仮定します。
Dim TextLine As String
' Open file.
FileOpen(1, "TESTFILE", OpenMode.Input)
' Loop until end of file.
While Not EOF(1)
' Read line into variable.
TextLine = LineInput(1)
' Print to the console.
WriteLine(1, TextLine)
End While
FileClose(1)
スマート デバイス開発者のためのメモ
この関数はサポートされていません。
必要条件
名前空間 : Microsoft.VisualBasic
モジュール : FileSystem
アセンブリ : Visual Basic ランタイム ライブラリ (Microsoft.VisualBasic.dll)
参照
処理手順
方法 : Visual Basic で StreamWriter を使用してテキストをファイルに書き込む
方法 : Visual Basic でテキストをファイルに書き込む