打开时使用代码过滤MS Access表单

时间:2014-03-23 14:13:57

标签: ms-access access-vba ms-access-2010

我正在尝试在表单上添加一个过滤器" frmProjectCharter01"打开它(从点击按钮)它将只显示字段" OnLoad"在其基础表" tblProjectMasterList"有一个"非null"值。

我目前的代码是

DoCmd.OpenForm "frmProjectCharter01"

Me.Filter = [OnLoad] Is Not Null

不幸的是,我得到了一个"赞美错误"私人子开场线突出显示的消息以及" [OnLoad]"字段。

1 个答案:

答案 0 :(得分:3)

Filter属性是一个字符串表达式,因此您可以通过添加引号来避免编译错误。

Me.Filter = "[OnLoad] Is Not Null"

但是,从您的问题的其余部分来看,我的印象是您应该使用OpenForm WhereCondition (请参阅帮助主题了解详情),而不是设置Filter

DoCmd.OpenForm "frmProjectCharter01", WhereCondition:="[OnLoad] Is Not Null"