根据文本框值隐藏MS Access Report中的按钮

时间:2015-09-21 13:42:52

标签: ms-access access-vba

您好,我有一个包含子报告的表单。子报表包含按月的列表,其中包含将数据从访问数据库导出到Excel的按钮。如果访问数据库中的月份字段为空,我试图隐藏报告中的按钮。我已经尝试了下面的代码,但按钮仍然出现在报告中。当我专注于报告而不是加载时,按钮会被隐藏。有什么建议?

Private Sub Report_Current()
   If IsNull(Me!RcvdMnth) Then
       Me.btnExport.Visible = False
   Else
       Me!btnExport.Visible = True
   End If
End Sub

2 个答案:

答案 0 :(得分:0)

尝试在on load事件上使用相同的代码。

Private Sub Report_Load()
   If IsNull(Me!RcvdMnth) Then
       Me.btnExport.Visible = False
   Else
       Me!btnExport.Visible = True
   End If
End Sub

答案 1 :(得分:0)

试试这个:

Private Sub Report_Current()
    If IsEmpty(Me!RcvdMnth) Or IsNull(Me!RcvdMnth) Then
        Me.btnExport.Visible = False
    Else
        Me.btnExport.Visible = True
    End If
End Sub

我尝试根据您的描述重新创建表单和子报表,它对我有用。