Do Until rs1.EOF であるレコードをスキップしたい

ＡＣＣＥＳＳ２００７のＶＢについて教えて下さい。
テーブルをオープンし
RecordSetとして、rs1、に読み込まれてきます。
あるフィールド、廃油計がゼロのときは、そのレコードに対し
　処理をスキップしたいのです。
苦しまぎれに、下記のように
　　Continue、を使うとContinueが関数とみなされてしまいます。
ある、レコードをスキップさせたいとき、
　　そのようにCoding、したらいいのでしょうか？
---------------------------------------
Do Until rs1.EOF
If rs1![廃油計] = 0 Then
continue
End If
'
'処理
'
rs1.MoveNext
Loop
------------------------------------
よろしくお願いします。

No.1 ベストアンサー 回答者： redfox63 回答日時： 2008/11/02 15:18

AccessのVBAにはContinueステートメントが存在しません

Do ... Loop構文の制御は Exit Doでループを抜けるといったものしかありません

したがって 特定の条件以外の処理を記述する場合
If then else end ifの構文で制御しましょう

Do Until rs1.EOF
　　If rs1![廃油計] <> 0 Then
　　　　'
　　　　'処理
　　　　'
　　End If
　　rs1.MoveNext
Loop
といった具合です ・・・

この回答へのお礼

回答ありがとうございました。
If rs1![廃油計] <> 0 Then
で解決しました。

お礼日時：2008/11/02 17:00