2017-03-12 6 views
0

私は2つの方法で起動することがthatmayフォームMyFormをしてきたかを決定しますDocMd.openformによってフォームが起動された場合のみSeekCustomer()を起動してください。はどのようにプログラム的にフォームがインスタンス化または単純に開かれた場合

どうすればいいですか?その後

Dim OpenArgs As Variant 
OpenArgs = "*" 
DoCmd.OpenForm "MyForm", , , , , , OpenArgs 

、フォームを開く、のチェック:

おかげで最初のケースのための

答えて

0

使用これを

If Not IsNull Me.OpenArgs) Then 
    SeekCustomer() 
End If 
+0

おかげで、私はこのソリューションを使用することはできませんいくつかの既存のモジュールがこのフォームを開き、私は英語で説明することができない何らかの理由でそれらを変更できないからです。私のための唯一の方法は、既存のコードに対して透過的な方法でMyFormを改善することです。それは私が以前あなたが答えた質問の目標でした。 –

+0

あなたが何かを変えることができなければ、あなたはもちろん、ホースです。 – Gustav

+0

私は降伏しません;-)ありがとう –

関連する問題