ファイル位置指示子を動かすには？
解決皆様よろしくお願いします。
ファイルをバイトで読み込んでいるのですが、
Dim bytBufTXT_IN As Byte
略
ReDim bytBufTXT_IN(1 To いくつか)
略
Get #1, , bytBufTXT_IN
読み込み場所を戻したい時にはどうしたらよろしいのでしょうか？
読み込んだバイト数を計算しておいてSeekステートメントを使って初めからのバイト数を指定してあげればいいのですが、もっと直感的にC言語でいう、SEEK_CUR のような物はないのでしょうか？VB6です。
> Seekステートメントを使って初めからのバイト数を指定してあげればいいのですが
位置の指定は、「Seekステートメント」ですが、
位置の取得は、「Seek関数」で行えます。
# …そういう事では無いのかな?
返答ありがとうございます。
取得ではなく設定がしたいのです。
□□□□□□□□□□(□=1byte)
↑
指示子
となっていた場合、
□□□□□□□□□□(□=1byte)
↑
指示子
にするには、Seek #1,3 とすればいいと思うのですが、
現在の場所から「相対的」に指示子を-5動かしたいという事なのです。
こんな関数やステートメントはないですか？Seekは「絶対的」位置を指定出来るだけみたいなので・・・。
書き込んだらずれてしまいました＿|‾|○
初めの指示子は８バイト目
２番目の指示子は３バイト目を指している事として下さい。
やったことないんで素人考えですが、
絶対位置を『取得』して、相対的に『指定』すれば良いんじゃないですか？
やっぱりそんな都合のいい物はないですね(^▽^;)>゛
変数一つ増えてしまいますが、Seekステートメントで妥協します。
魔界の仮面弁士様、nanashi様
ありがとうございました。
| ツイート |  |