1

アクセスを使用して学生データベースを作成しています。データベースの一部として、ユーザーがコンボ ボックスからコースを選択する必要があるフォームがあります。ドロップダウン ボックスから選択したコースに応じて、さまざまなコース条件を利用できます。用語は、一貫性を保つためにドロップダウン ボックスを使用して選択することもできます。

私のコードにはAfter_Click、次のコードを含むイベント プロシージャがあります。

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

フォームを最初にクリックすると、すべての用語ドロップダウン ボックスが表示されます。Term IDデフォルトでデフォルトに対応するものCourse IDが表示され、残りのTerm IDドロップダウンボックスが非表示になるように(VBAコードで)設定するにはどうすればよいですか?

トム

デフォルトのスクリーンショットを添付しましたCourse ID。すべてのコンボ ボックスが表示されていることに注意してください。

ここに画像の説明を入力

4

2 に答える 2

0

オプション 1 デフォルトのコースを定義し、フォームの最初の読み込み時に事前に選択し、対応するコンボ ボックスを表示する 残りのコンボ ボックスをデフォルトで非表示にする (つまり、残りのコンボ ボックスの visible プロパティを設計時に false )

オプション 2 デフォルトのコースを設定できない場合は、すべての用語コンボ ボックスをデフォルトで非表示にします。そのため、最初は使用可能な用語コンボ ボックスはまったくありません。

于 2012-05-04T01:30:16.200 に答える
0

連続フォームでは、すべてのコントロールがすべてのレコードに対して 1 回だけ存在します。異なるレコードの同じコントロールに異なる書式を設定することはできません。コントロールを 1 つのレコードで非表示にすると、すべてのレコードで非表示になります。

それらの箱には何が入っていますか? OnEntring イベントで埋められるコンボが 1 つある可能性はありますか?

于 2012-05-04T22:39:47.060 に答える