请帮忙。我有一个包含5个文本框的报告。如果一个文本框为空或相应的表字段中没有数据,如何隐藏所有其他文本框。
答案 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