我正在使用 Access 制作学生数据库。作为我的数据库的一部分,我有一个表格,要求用户从组合框中选择一门课程。我有不同的课程术语,对应于他们从下拉框中选择的课程。为了保持一致性,还使用下拉框选择术语。
在我的代码中,我有一个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
当我第一次单击表单时,所有术语下拉框都会显示。我如何设置它(在 VBA 代码中),以便默认情况下显示与默认值Term ID
对应的并且隐藏Course ID
其余的Term ID
下拉框?
汤姆
我附上了默认的截图Course ID
。请注意,所有组合框似乎都是可见的。