使用复选框切换文本框访问表单以使其可见

时间:2014-10-06 21:53:21

标签: forms ms-access access-vba ms-access-2010

我试图减少我的表格的混乱,因为我获得的数据可以从我的表中填充更多或更少的字段。

现在我正在尝试构建一个事件,但我不知道用于创建事件的正确语法。

现在我有:

    = if toggle.onclick ="yes" then
    data.visible=true
    else
    data.visible=false
    end if

在“事件”选项卡的“更新后”选项卡中。

我希望能让你知道我想做什么。

我在测试表单上有这个,所以唯一的对象是: 复选框名称“切换” 文本框名称“数据”

此时默认情况下文本框不可见。

我的目标是拥有一个复选框列表,一旦选中它们,相应的文本框就会出现在刷新上。通过这种方式,工作人员不会被我当前表格上的文本框数量所吓倒。也将减少当前形式的巨大混乱。

1 个答案:

答案 0 :(得分:0)

默认情况下,'切换'价值是正确还是错误 - 不是'是'或者没有'。因此,您需要切换字段:

Private Sub Toggle_AfterUpdate()
    If Me.Toggle = True Then
        Me.Data.Visible = True
    Else
        Me.Data.Visible = False
    End If
End Sub