设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 3733|回复: 10
打印 上一主题 下一主题

[窗体] 请教个关于窗体筛选的问题

[复制链接]
跳转到指定楼层
1#
发表于 2013-11-21 11:00:55 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
窗体有一个文本字段,我想通过vba筛选出来,把里面不包含“aaa”的筛选出来(空字段保留),代码如下:

Me.Form.Filter = "nz([字段],0)=0 or (not [字段] Like '*aaa*') "
Me.Form.FilterOn = True



但是提示出错

若是单独分开筛选:
Me.Form.Filter = "nz([字段],0)=0 "
Me.Form.FilterOn = True


或者

Me.Form.Filter = "not [字段] Like '*aaa*' "
Me.Form.FilterOn = True


都可以通过,为什么用“or”合起来就不行了呢?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享分享 分享淘帖 订阅订阅
2#
 楼主| 发表于 2013-11-21 11:05:35 | 只看该作者
如果只用:
Me.Form.Filter = "not [字段] Like '*aaa*' "
Me.Form.FilterOn = True
筛选结果会连空字段都筛选掉的,这个不符合目的

点击这里给我发消息

3#
发表于 2013-11-21 11:46:17 | 只看该作者
提示出错,什么提示?
4#
 楼主| 发表于 2013-11-21 12:03:17 | 只看该作者
轻风 发表于 2013-11-21 11:46
提示出错,什么提示?

Me.Form.Filter = "nz([字段],0)=0 or (not [字段] Like '*aaa*') "
Me.Form.FilterOn = True

这个提示:运行时错误 ‘3075’,语法错误(操作符丢失) 在查询表达式‘nz([字段],0)=0 or (not [字段] Like '*aaa*')’中

Me.Form.Filter = "nz([字段],0)=0 or not [字段] Like '*aaa*' "
Me.Form.FilterOn = True
这个提示:运行时错误 ‘3709’,所有记录中均未找到搜索关键字
5#
 楼主| 发表于 2013-11-21 12:05:07 | 只看该作者
轻风 发表于 2013-11-21 11:46
提示出错,什么提示?

轻风哥,需要我传个附件上来吗?

点击这里给我发消息

6#
发表于 2013-11-21 13:50:20 | 只看该作者
你不如直接这样:
  1. Me.Form.Filter = "not NZ([字段]) Like '*aaa*' "
  2. Me.Form.FilterOn = True
复制代码
7#
 楼主| 发表于 2013-11-21 14:05:36 | 只看该作者
轻风 发表于 2013-11-21 11:46
提示出错,什么提示?

附件上传了

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
8#
 楼主| 发表于 2013-11-21 14:10:50 | 只看该作者
轻风 发表于 2013-11-21 13:50
你不如直接这样:

搞掂了,轻风哥,谢谢你啊!

点击这里给我发消息

9#
发表于 2013-11-21 16:39:55 | 只看该作者
smilingkiss 发表于 2013-11-21 12:03
Me.Form.Filter = "nz([字段],0)=0 or (not [字段] Like '*aaa*') "
Me.Form.FilterOn = True

错误‘3075’,那是因为你把括号打成中文的了。

点击这里给我发消息

10#
发表于 2013-11-21 16:46:34 | 只看该作者
本帖最后由 轻风 于 2013-11-21 16:50 编辑

还有类型不匹配,是因为nz([字段],0)返回的是文本类型的0(可能是因为字段类型的缘故),所以应该写成nz([字段],0)='0'我一般都是用nz([字段])='',返回空字符串。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2025-1-23 16:56 , Processed in 0.098872 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表