MSアクセスイベントロードフォーム

Question

私は約400のFormsを持つ約20のMS-Accessデータベースを持っていて、どのフォームがロードされてもアクションを実行したいと思っています。 データベースやアプリケーションレベルのイベントが必要になります。これは、開いている/ロードされている任意のフォームでトリガーされます。次に、それぞれのデータベースにコードを1回追加するだけでよいのですが、それぞれの400のフォームにコードを追加する必要はありません。 そして：それはVBA（Access> = 2010）になければなりません！ 私の質問：これも可能ですか？もしそうなら、誰かがヒントを持っていますか？ ありがとう、 Pete

Answer 1

これについては、複数の方法があります。

私は多分やるだろうことは以下の通りです：

1. データベースがタイマーで（AutoExecマクロを使用して）を開くたび開く隠しフォームを作成します。
2. 隠しフォームを読み込むときに、データベースで使用可能なすべてのフォームのコレクション/マルチレベル配列を初期化し、ステータスをclosedに設定します（おそらく多レベル配列またはコレクション内のコレクションを使用するとフォーム名+ブール値のオープンまたはクローズを格納する）。
3. 定期的にコレクションを繰り返し、変更がないかチェックして、フォームが閉じられてイベントが発生したときにいつでも確認できます。

また、VBAを使用してすべてのフォームを反復し、存在しない場合はモジュールを追加して、そのモジュールに目的のコードを追加することもできます。 （おそらくコードを作成してそのアクションを元に戻すことができれば、コードを実際に維持することができます。それを洗練しながら、フォームにすでにアクションがあるかどうかを確認し、存在する場合はそれにコードを追加することができます。

すべてが可能ですが難しいです。いくつかのステップにポインターが必要な場合、私はそれらを与えることができますが、実装上の大きな問題については別の質問をしたいと思います。