【Access】複数フォームを閉じる時の、選択処理について

Access Ver. : 2003
Windows Ver.: XP

Accessフォームの「閉じる時」処理で、下記のような工夫をした
いと考えております。

・フォームがひとつしか開かれていないとき、Accessを終了する
・複数のフォームが開かれている時、そのフォームのみを閉じる

そんなVBAコードがありましたら、教えてください。
何か参考になるページでも、かまいません。
どうぞ、宜しくお願いいたします。

No.1 ベストアンサー 回答者： nicotinism 回答日時： 2006/12/07 10:23

forms.count で開いているフォーム数を得て分岐

Application.quit

Access VBE のヘルプで、CurrentProject オブジェクト を見てみたら？

この回答へのお礼

ご回答ありがとうございます。
無事、解決しました。

コードとしては、
If Forms.Count = 1 Then　～
Else　～
End If
という形ですね。
どうもありがとうございました。

お礼日時：2006/12/08 09:46