Accessを使用して学生データベースを作成しています。私のデータベースの一部として、私はコンボボックスからコースを選択する必要があるフォームを持っています。私はドロップダウンボックスからどのコースを選択するかに応じて、利用可能なコースの条件が異なります。また、用語は、一貫性のためにドロップダウンボックスを使用して選択されます。私が最初にフォームをクリックするとダウンボックス用語低下のすべてが表示されているコンボボックスVBAコーディングの問題
Private Sub Course_ID_AfterUpdate()
If Me![Course ID] = 1 Or Me![Course ID] = 2 Or Me![Course ID] = 3 Then
Me![Combo30].Visible = True Else: Me![Combo30].Visible = False End If
If Me![Course ID] = 4 Then Me![Combo26].Visible = True Else:
Me![Combo26].Visible = False End If
If Me![Course ID] = 5 Then Me![Combo22].Visible = True Else:
Me![Combo22].Visible = False End If
If Me![Course ID] = 6 Then Me![Combo28].Visible = True Else:
Me![Combo28].Visible = False End If
If Me![Course ID] = 7 Then Me![Combo24].Visible = True Else:
Me![Combo24].Visible = False End If
End Sub
:私のコードで
は、私は次のコードでAfter_Click
イベントプロシージャを持っています。デフォルトでは、Course ID
に対応するTerm ID
が表示され、残りのTerm ID
ドロップダウンボックスは非表示になるように(VBAコードで)どのように設定しますか?
トム
私はデフォルトCourse ID
のスクリーンショットを貼られています。すべてのコンボボックスが表示されているように見えます。