细胞选择可见性

问题描述

大家好,感谢您帮助我解决我的小问题。

我正在构建一个数据库,但遇到了一个问题。当从下拉菜单中选择一个选项时,我试图使某些单元格可见。

例如我想选择 Main wheel,然后我只希望 osi313 可见,osi314 隐藏。

我对此的编码如下。但是无论出于何种原因,当我选择 Main wheel 时它什么也不做,而当我选择前轮时,它会显示正确的可见单元格。

Private Sub Wheel_Type_Change()
    If Wheel_Type.Value = "Main Wheel" Then
        Me.OSI313_Label.Visible = True
        Me.OSI313.Visible = True
    Else
        Me.OSI314_Label.Visible = False
        Me.OSI314.Visible = False
    End If

    If Wheel_Type.Value = "Nose Wheel" Then
        Me.OSI314_Label.Visible = True
        Me.OSI314.Visible = True
    Else
        Me.OSI313_Label.Visible = False
        Me.OSI313.Visible = False
    End If
End Sub

解决方法

我修复了我的代码以允许这些字段工作。当我制作测试资产和带有信息的字段时,我希望在浏览记录时这些字段处于活动状态。例如,在轮子类型下,类型表示“鼻轮”。但如果之前的记录是主轮,则 osi314 字段将不可见。我想让记录显示适当的字段,而不必切换下拉菜单。

Private Sub Wheel_Type_Change()
If Wheel_Type.Value = "Select Type" Then
    Me.OSI314_Label.Visible = False
    Me.OSI314.Visible = False
    Me.OSI313_Label.Visible = False
    Me.OSI313.Visible = False
End If
If Wheel_Type.Value = "Main Wheel" Then
    Me.OSI313_Label.Visible = True
    Me.OSI313.Visible = True
    Me.OSI314_Label.Visible = False
    Me.OSI314.Visible = False
End If

If Wheel_Type.Value = "Nose Wheel" Then
    Me.OSI314_Label.Visible = True
    Me.OSI314.Visible = True
    Me.OSI313_Label.Visible = False
    Me.OSI313.Visible = False
End If

结束子