MS Access。如果一个文本框数据为空,我如何隐藏报表中的所有文本框

时间:2015-09-10 17:16:33

标签: ms-access

请帮忙。我有一个包含5个文本框的报告。如果一个文本框为空或相应的表字段中没有数据,如何隐藏所有其他文本框。

1 个答案:

答案 0 :(得分:0)

null和empty之间存在差异,这就是我询问允许空字符串的文本字段的原因。我试图提供最简单的解决方案,但既然你没有回答这个问题,那么这将是有效的。 在详细信息部分的格式事件中(或文本框所在的任何部分)放置此代码。

Dim binVis as Boolean
binVis = (IsNull(Me!YourNumberFieldTextBox) Or Nz(Me!YourTextBox1,"") = "" Or Nz(Me!YourTextBox2,"") = "" Or Nz(Me!YourTextBox3,"") = "" Or Nz(Me!YourTextBox4,"") = "")
Me!YourNumberFieldTextBox.Visible = binVis
Me!YourTextBox1= binVis
Me!YourTextBox2= binVis
Me!YourTextBox3= binVis
Me!YourTextBox4= binVis