掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
on errorで元の位置にもどるには? (ID:103734)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
on error が実行されたら、エラーを修復して元の位置に戻りたいのですがいい方法はありますか? 例 on error goto errdata errdata: If Err.Number = 9 Then RBufCnt = RBufCnt + 5 ReDim Preserve RBuf(RBufCnt) As Byte Resume Next End If RBuf(n)にデータを順次入れ込んでいる時に個数が足らなくなった時エラーになってしまうのですが、上のようにカウンタを増やして元の位置に戻ろうと思ったのですが、記述のようにnextと書いてあるので、次の行すなわちエラーが発生した行のデータが格納できません。 何かいい方法はありますか? 教えて下さい。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.