VB6,Ifから抜けるには?

If a = b then
　　xxx
　If c = d then
　　　ここ！
　End If
　　yyy
End If

zzz

上のここ！から抜け、zzz以降の処理を継続するにはどうすればよいでしょうか？
Exit Subをやってしまうとプロシージャ自体から抜けてしまいます。

No.2 ベストアンサー 回答者： imogasi 回答日時： 2005/09/06 06:33

（１）下記が、処理順序の都合でできる場合

ｙｙｙの処理がｃ＝ｄに影響しないとき
If a = b then
　　xxx
yyy
　If c = d then
　　　ここ！
else
　End If
End If
zzz
（２）できない場合
If a = b then
　　xxx
　If c = d then
　　　ここ！
　　　yyy
　else
yyy
　end if
End If
zzz
ｙｙｙのコードのステップ数が多い場合、２回記述をサブルーチンか何かを使い回避する。
（３）GoToを使う方法

この回答へのお礼

いろいろとあるんですね！ありがとうございました。

お礼日時：2005/09/07 01:10

No.3 回答者： name_mm_ok 回答日時： 2005/09/06 14:50

If a = b then

　　xxx
　If c <> d then
　　　yyy
　End If

End If

zzz

ではだめですか？

この回答へのお礼

なるほど、こうすれば確かに問題ないですね。
ありがとうございました。

お礼日時：2005/09/07 01:09

No.1 回答者： t_shadowback 回答日時： 2005/09/06 05:51

--------------------

If a = b then
　　xxx
　If c = d then
　　www
　Else
　　yyy
　End If
End If

zzz

--------------------
では、駄目ですか。

強引な方法もありますが、のっぴきならない設計の時だけなので、あえて答えません。悪しからず。

この回答へのお礼

こういうやりかたがあったんですね。抜ける方法ばかり考えてしまっていました。
ありがとうございました。

お礼日時：2005/09/06 17:26