2016-07-01 7 views
0

クエリとフォームを含むデータベースがセットアップされているため、問題が発生しています。フォームには、ID値のリスト(1,2,3、...など)から選択できるドロップダウンメニューがあります。値を選択したら、ボタンをクリックして、ドロップダウン([フォーム]![KitInfoRetrievalForm]![DropDown])からID番号のパラメータでクエリを実行します。ドロップダウンパラメータがクエリの値を返さない

ドロップダウンメニューから何かを選択してボタンをクリックすると、[Forms] [KitInfoRetrievalForm]の代わりに値を求めるポップアップボックスが表示されます。 ![落ちる]。これは、ドロップダウンメニューが何らかの理由でヌル値であるか、それに対するパススルーが正しくないと信じさせてしまいます。

これは1つのポイントで動作していて、別のものから完全に(同じAccessプロジェクト内で)一連の奇妙なエラーメッセージの後に停止しました。あなたが私に与えることができるどんな助けも大歓迎です。

+0

[Forms]![KitInfoRetrievalForm]![DropDown]を置き換える[フォーム] [KitInfoRetrievalForm] [ドロップダウン]! 'はクエリ条件の正しい構文です。エラーメッセージは関係ないと確信していますか? –

+0

さて、彼らは異なった形式とモジュールになっていました。完全に無関係。今のところ、私はちょうどこれがまだ動作する私のDBの以前のバージョンに行きました、そして、私は(それが動作する以外の)相違を見ません。 – Ulthran

答えて

0

照会のドロップダウンへの参照を機能別に置き換えることをお勧めします。これは、この問題を排除する必要がありますまた、これはすべての最新バージョンに存在するAccessの古いバグの回避策です:フォーム/サブフォームがデータシートモードでフィルタを適用した場合(ユーザーインターフェイスまたはVBAを使用したクイックフィルタ)変数への参照をコントロールやパラメータだけで読み込み、最後に使用した値を使用します。私が読んで、フォーム/サブフォームコントロール値のため、この機能を使用してい :あなたのケースでは

Public Function GetControlValue(strFormName As String, strControlName As String, Optional strSubFormControlName As Variant) As Variant 
On Error Resume Next 
If IsMissing(strSubFormControlName) Then 
    GetControlValue = Forms(strFormName).Controls(strControlName).Value 
Else 
    GetControlValue = Forms(strFormName).Controls(strSubFormControlName).Form.Controls(strControlName).Value 
End If 
End Function 

は、あなたが `列挙されている何

GetControlValue("KitInfoRetrievalForm","DropDown") 
関連する問題