Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vba 基于Microsoft Access文本字段中的数据隐藏文本框_Vba_Ms Access_Ms Access Forms - Fatal编程技术网

Vba 基于Microsoft Access文本字段中的数据隐藏文本框

Vba 基于Microsoft Access文本字段中的数据隐藏文本框,vba,ms-access,ms-access-forms,Vba,Ms Access,Ms Access Forms,我是一个新手,我正在尝试创建一个表单,其中可用的文本框取决于字段中的数据 我已经做了一个拆分表格,我想根据所选行“产品”中的现有数据,为书籍设置“作者”和“日期”框,为玩具设置“类型”和“年龄”框。 因此,如果下一个产品是一本书,那么我有两个文本框可见,如果它是一个玩具,我有类型和年龄 我已经做到了这一点: Private sub Product_Line_AfterUpdate() Select Case Me.Product_Line.Value Case "Book" Me.Type.V

我是一个新手,我正在尝试创建一个表单,其中可用的文本框取决于字段中的数据

我已经做了一个拆分表格,我想根据所选行“产品”中的现有数据,为书籍设置“作者”和“日期”框,为玩具设置“类型”和“年龄”框。 因此,如果下一个产品是一本书,那么我有两个文本框可见,如果它是一个玩具,我有类型和年龄

我已经做到了这一点:

Private sub Product_Line_AfterUpdate()

Select Case Me.Product_Line.Value
Case "Book"
Me.Type.Visible = False
Me.Age.Visible = False
Else 
Me.Year.Visible = False
Me.Author.Visible = False

End select
我很确定我没有正确使用“afterupdate”,因为基本上字段没有被更新,我只是更改拆分表单上的选择。我尝试了“onload”,但也不起作用


谢谢

可能需要多个事件中的代码,例如当前和更新后。在启用条件格式设置的情况下,这是不必要的。可能需要在多个事件中使用代码,例如Current和AfterUpdate。如果启用条件格式设置,则无需执行此操作。