在报表Microsoft Access中隐藏不需要的控件

时间:2014-10-25 18:20:24

标签: sql ms-access access-vba

目前我正在使用Microsoft Access生成报告。我有问题,我需要将一些控件显示为false,如果有条件A,那么只有某些控件可见,如果condition = B,则不同的控件可见为真。

以下是我工作的代码: -

strqry = "SELECT * FROM tbl_task_entry_dublin INNER JOIN tbl_resource ON     
tbl_task_entry_dublin.user_id=tbl_resource.user_id"
Set rst = CurrentDb.OpenRecordset(strqry)
With rst
.MoveLast
rst_total_count = .RecordCount
.MoveFirst
For i = 0 To rst_total_count - 1
If Nz(!activity_name) = "Test Execution" Then
Me.txt_script.Visible = False
Else
Me.txt_script.Visible = True
End If
.MoveNext
Next i
Me.RecordSource = strqry
End With

我使用此代码的问题,它只占用最后一个记录。例如,有9条件,它只显示符合记录9条件的控件。所以所有记录都会显示相同的控件。

1 个答案:

答案 0 :(得分:1)

你的代码完全按照它所写的方式执行,这显然不是你需要的,所以扔掉它并将报告的记录源设置为它应该是什么。 添加到报告中,与txt_script相同的部分,绑定到activity_name的文本框,并将其可见属性设置为no。 在包含txt_script的节的格式事件中,添加以下代码: 我!txt_script.Visible = Not(Nz(Me!activity_name,"")=" Test Execution")