Ms access 如果为空,则清除;如果不是,则不使用
在我的表单中,我有一个搜索功能设置,我可以在其中键入任何字段并搜索特定数据,但如果我没有为其字段预先选择某些内容,则需要清除课程字段。我将它们的默认值设置为null。目前代码看起来像Ms access 如果为空,则清除;如果不是,则不使用,ms-access,vba,Ms Access,Vba,在我的表单中,我有一个搜索功能设置,我可以在其中键入任何字段并搜索特定数据,但如果我没有为其字段预先选择某些内容,则需要清除课程字段。我将它们的默认值设置为null。目前代码看起来像 Private Function SearchClear() Me.cboDevelopment1 = "" Me.cboDevelopment2 = "" Me.cboDevelopment3 = "" Me.cboDevelopment4 = "" Me.cboDevelopment5 = "" 'focus
Private Function SearchClear()
Me.cboDevelopment1 = ""
Me.cboDevelopment2 = ""
Me.cboDevelopment3 = ""
Me.cboDevelopment4 = ""
Me.cboDevelopment5 = ""
'focus on ID text box
Me.txtEmpID.SetFocus
'set button edit to enable
Me.cmdEdit.Enabled = True
'change caption of button add to Add
Me.cmdAdd.Caption = "Add Record"
'clear tag on txt id for reset new
Me.txtEmpID.Tag = ""
End Function
我想写一封信,如果为空,则清除字段,如果不为空,则让它们为空,以便可以查找指定的课程
我甚至尝试添加在后台运行的搜索查询中,但该查询不为空。因此您有一个用于搜索课程的表单 您说您已经将默认值设置为null,那么它会是这样的吗
Me.cboDevelopment1 = NULL
Me.cboDevelopment2 = NULL
Me.cboDevelopment3 = NULL
Me.cboDevelopment4 = NULL
Me.cboDevelopment5 = NULL
或者,当你说如果他们没有预选某个内容就必须清除时,用户已经选择了一个值,现在在你运行搜索之前,你的表单是这样的
Me.cboDevelopment1 = NULL
Me.cboDevelopment2 = VALUE1
Me.cboDevelopment3 = NULL
Me.cboDevelopment4 = VALUE2
Me.cboDevelopment5 = NULL
然后用户会单击“搜索”,您会在搜索前执行此清除您要搜索的内容?我不明白问题是什么。问题是如何测试空值?是的,值自动为空。因此,当我运行搜索时,如果值仍然为空,我需要清除空值,但是,如果值不是null,我需要将其保留为空。当您说“需要清除null”时,您的意思是要用空字符串替换任何null值吗?是的,因此单元格将为空。在搜索之前,如果值为null,则需要清除字段run@user2119980也许我误解了,但如果价值是在运行搜索之前为Null,则该字段已清除。你可以发布你的完整搜索代码,这样我们就可以看到你想要实现的结果了吗?完整的搜索代码非常庞大,我将组合框的默认值设置为显示Null@user2119980我已经更新了我的答案。我的假设正确吗?