Ｐａｇｅ 180 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼テキストファイルを途中の行から読み込むには？ デヤン 02/10/9(水) 11:23 ┗Re:テキストファイルを途中の行から読み込むには？ Jaka 02/10/9(水) 13:30 ┗Re:テキストファイルを途中の行から読み込むには？ デヤン 02/10/9(水) 14:11 ─────────────────────────────────────── ■題名 ： テキストファイルを途中の行から読み込むには？ ■名前 ： デヤン ■日付 ： 02/10/9(水) 11:23 -------------------------------------------------------------------------
| こんにちは。 また、教えてください。 テキストファイルを一行ずつ読み込んで行く処理で １１行目から読み込みたい場合はどのような方法で 行なえばいいのでしょうか？ Open "test.txt" For Input As #1 を使って読み込みを行なっています。 お願いします。教えてください。 |
| こんにちは。 読み込み方が記載されていないので、Line Inputと想定してます。 こんな感じに11行までは、ただ読み込んでいく方法ぐらいしか。 （固定長のテキストではない場合、因に固定長であっても私は解りません。） CNT=0 Do Until EOF(1) Line Input #1, 読み込みデータ CNT = CNT + 1 If CNT < 11 then 何もしない。 Else やりたい処理 Endif Loop もしくは、 Do Until CNT=11 Line Input #1, 読み込みデータ CNT = CNT + 1 Loop Do Until EOF(1) Line Input #1, 読み込みデータ やりたい処理 Loop |
| Jakaさん、こんにちは。 すいません、読み込み方が記載さてませんでしたね。 想定通りLine Inputです。 Jakaさんの解答のように やってみたとこ、１１行目から表示することができました。 Jakaさんのおかげです。ありがとうございます！ |