Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

窗体按inputbox输入文本进行模糊查找

王小宝  发表于:2012-08-08 16:05:16  
复制

我写了代码

Private Sub Form_Load()
    Dim name As String
    name = inputbox("请输入单位其中的关键字", "单位名称查询")
    Me.RecordSource = "SELECT 201客户信息.客户名称 as 客户名称 FROM 201客户信息 where 201客户信息.客户名称 like ""*" & name & "*"""
End Sub

为什么会不行啊,大虾指点

点击下载此附件

 

Top
叶海峰 发表于:2012-08-08 16:32:33

改改引号

Me.RecordSource = "SELECT 201客户信息.客户名称 as 客户名称 FROM 201客户信息 where 201客户信息.客户名称 like  '*" & name & "*'"



煮江品茶 发表于:2012-08-08 17:25:02
Me.RecordSource = "SELECT 201客户信息.客户名称 as 客户名称 FROM 201客户信息 where 201客户信息.客户名称 like '*" & inputbox("请输入单位其中的关键字", "单位名称查询") & "*'"

王小宝 发表于:2012-08-08 23:31:54

改为    Me.RecordSource = "SELECT 201客户信息.客户名称 as 客户名称 FROM 201客户信息 where 201客户信息.客户名称 like '*" & name & "*'"    还是不行

改为    Me.RecordSource = "SELECT [201客户信息].客户名称 as 客户名称 FROM 201客户信息 where [201客户信息].客户名称 like '*" & name & "*'"  居然可以,为啥



王小宝 发表于:2012-08-08 23:38:10
不加这个方括号,提示说“运行时错误,代码3075”“语法错误,操作符丢失,在    '201客户信息.客户名称'   中”,我想不通有什么错,但是加了方括号就可以了,一个群友发来一个示例,同样的问题,他不加方括号却是可以的

总记录:4篇  页次:1/1 9 1 :