■ 現在のこのページの役立ち度:
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する:
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右):大変役立った):
■ ページの共有:
[ サイト内検索 ]
カスタム検索
#1635-2
シーケンシャルファイルの行の最後の検出方法をおしえて下さい。
申し訳ありませんが、どなたか教えてくださいませんか?
シーケンシャルファイルの行の最後には、CR-LFがついていると本で読んだのですが
それの検出方法とかは、あるのでしょうか?
#1640-2
RE#1635:シーケンシャルファイルの行の最後の検出方法をおしえて下さい。
Line Input # でシーケンシャルファイルアクセスした場合、改行文字を区切りとして、1行分を
得る事ができますよ。
#1641-2
RE#1635:シーケンシャルファイルの行の最後の検出方法をおしえて下さい。
> 申し訳ありませんが、どなたか教えてくださいませんか?
> シーケンシャルファイルの行の最後には、CR-LFがついていると本で読んだのですが
> それの検出方法とかは、あるのでしょうか?
何を最終的に聞きたいのかわかりませんが、
バイナリモードでオープンして、
一挙に配列へ読み込み、配列の最後2つがCr+Lfかどうか判定すると
いうことでしょうか?
#1644-2
RE#1641:シーケンシャルファイルの行の最後の検出方法をおしえて下さい。
> > 申し訳ありませんが、どなたか教えてくださいませんか?
> > シーケンシャルファイルの行の最後には、CR-LFがついていると本で読んだのですが
> > それの検出方法とかは、あるのでしょうか?
> 何を最終的に聞きたいのかわかりませんが、
> バイナリモードでオープンして、
> 一挙に配列へ読み込み、配列の最後2つがCr+Lfかどうか判定すると
> いうことでしょうか?

質問の仕方が悪くてどうもすいません。

たとえば  a,b,c(Cr+Lf)
         d,e,f(Cr+Lf)
というシーケンシャルデータがあった場合
Open data input #1
x=1:y=1
Do while Not EOF(1)
   Input #1,d(x,y)
         if Instr(d(x,y),vbCrLf)>0 Then
                x=x+1
         End if
   y=y+1
Loop
Close #1
というような感じで配列変数に入れたいと思っているのですが
可能なのでしょうか?
考え方が、根本的に間違っていたらどうもすいません。


#1646-2
RE#1644:シーケンシャルファイルの行の最後の検出方法をおしえて下さい。
項目別に、データを分けたいならば、Input # を繰り返すだけで十分ですよ。 改行コードまでに
何個データがあるかは予め判っているのだから、その数だけ代入したなら、1行終わったと判定で
きますよね?

または、先にも書いたように Line Input # です。 とにかく、シーケンシャルファイルを読み込
んだ場合、区切り文字や改行コードはアプリ側には返ってこないのです。 ですが、ちゃんと区切り
文字や改行コードはデータの区切りである事を Input # の命令が判断するので、プログラムが改行
コードを探さなくても問題はないはずです。 (プログラムが改行を探さないといけないのは、バイ
ナリファイルアクセスする時です)

シーケンシャルファイルの扱い方は、VB でもとっても大事な基礎なので、いろいろデバッグしてみ
て、その動作を理解してみてください。
このページと関連する記事:
#19367-0固定長のファイルの読み込み、書込み2001-03-06(火) 10:47
#4011-0*.txtを読み込むには?1999-12-03(金) 12:07
#984-2シェアウェアでよく見るパスワード設置法<2>2001-11-04(日) 11:01
#1506-050万行のテキストファイルオープンで固まる2005-03-28(月) 18:12
#548-0txtファイルの読み込み方1999-08-02(月) 19:13
#39508-0CSVファイルは読み込めますか?2001-02-26(月) 16:10
#29900-0読み込みファイルと書き出しファイルのサイズ違いについて2002-07-09(火) 12:10
#28246-0バイナリー2002-04-15(月) 19:08
#17424-0ファイル保存時の最後の改行2000-12-27(水) 09:41
#41886-0シーケンシャルファイルの読込み2001-04-18(水) 16:47
お探しの情報は見つかりましたか?お困りの問題は解決しましたか?
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
(※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など)