我构建了一个Access表单,我试图隐藏一些对象。
我有一个下拉列表,所有数据都根据我从下拉列表中选择的名称进行更新。我第一次加载表单时,所有隐藏的对象都正常工作。我点击" Show"复选框,所有对象控件加载正常。然后,我保存记录并从下拉列表中选择一个新记录,但是,所有隐藏的对象仍然显示在新记录中。
我希望每次从下拉列表中选择新记录时都能隐藏它们。我该怎么做?
答案 0 :(得分:0)
创建一个隐藏所有对象的Sub。然后,在下拉列表的AfterUpdate事件中,调用该Sub。类似的东西:
Private Sub HideObjects()
Me.Object1.Visible = False
Me.Object2.Visible = False
End Sub
然后,在MyDropdownList的AfterUpdate事件中,你有这个:
Private Sub MyDropdownList_AfterUpdate()
Call HideObjects
End Sub