Office中国论坛/Access中国论坛

标题: 关于查找语句的请教 [打印本页]

作者: smilingkiss 时间: 2014-4-9 09:35
标题: 关于查找语句的请教
各位大哥大姐，请教一下：
一个表里面有两个字段，一个是A，一个是B，现在想通过一个B的值（是字符串），找到对应记录的A的值（是数字），请问该如何写语句？

作者: 盗梦 时间: 2014-4-9 09:39
B上面加条件啊，Dlookup函数或者 ADO

作者: smilingkiss 时间: 2014-4-9 09:49
本帖最后由 smilingkiss 于 2014-4-9 10:07 编辑

盗梦发表于 2014-4-9 09:39
B上面加条件啊，Dlookup函数或者 ADO

我现在是用了这样一句：
SELECT distinct 表.A FROM 表 WHERE (((表.B) Like '*' & '" & ‘abc’ & "' & '*'))
其中abc是表里面B字段的一个值（不重复的），现在的问题，
如何把A的值拿出来赋值给一个变量，例如，B字段是‘abc’，对应的A字段是3，我想把这个3赋值个变量tt但是我用下面语句，是不行的：
tt=SELECT distinct 表.A FROM 表 WHERE (((表.B) Like '*' & '" & ‘abc’ & "' & '*'))

应该如何写语句呢？

作者: 盗梦 时间: 2014-4-9 10:35
tt="SELECT 表.A FROM 表 WHERE 表.B Like '*" & "abc" & "*'"

作者: smilingkiss 时间: 2014-4-9 10:43

盗梦发表于 2014-4-9 10:35
tt="SELECT 表.A FROM 表 WHERE 表.B Like '*" & "abc" & "*'"

盗梦兄，你这一句，tt得出来的值就是一字符串啊，我想得到表.A的值啊

作者: smilingkiss 时间: 2014-4-9 10:44

盗梦发表于 2014-4-9 10:35
tt="SELECT 表.A FROM 表 WHERE 表.B Like '*" & "abc" & "*'"

是不是需要用ADO？如果是，还请详细指教啊

作者: 盗梦 时间: 2014-4-9 10:46

smilingkiss 发表于 2014-4-9 10:44
是不是需要用ADO？如果是，还请详细指教啊

用ADO比较好，因为模糊搜索出来的不一定只有一条记录

作者: 盗梦 时间: 2014-4-9 10:49

smilingkiss 发表于 2014-4-9 10:44
是不是需要用ADO？如果是，还请详细指教啊

Dim  rs  as  New  ADODB.RecordSet
Dim strSql  as  string

strSql="select  A  from  表  where  B  like  '%"  & "abc" &  "%'"  'ADO模糊匹配用%
rs.open strSql, currentproject.connection, 1, 3'打开记录
do  while not  rs.eof '循环查找到的记录
      debug.print  rs("A") '打印到立即窗体
      rs.movenext
loop
rs.close

作者: smilingkiss 时间: 2014-4-9 10:51

盗梦发表于 2014-4-9 10:46
用ADO比较好，因为模糊搜索出来的不一定只有一条记录

大哥，能否详细指点一下？

作者: 盗梦 时间: 2014-4-9 10:52

smilingkiss 发表于 2014-4-9 10:51
大哥，能否详细指点一下？

8楼已写了一些代码

作者: smilingkiss 时间: 2014-4-9 10:56

盗梦发表于 2014-4-9 10:49
Dim rs as New ADODB.RecordSet
Dim strSql as string

非常感谢，盗梦兄！
盗梦兄，你是广东的吗？找天出来吃饭！

作者: 盗梦 时间: 2014-4-9 11:01

smilingkiss 发表于 2014-4-9 10:56
非常感谢，盗梦兄！
盗梦兄，你是广东的吗？找天出来吃饭！

是的，我在中山

作者: smilingkiss 时间: 2014-4-9 11:37

盗梦发表于 2014-4-9 11:01
是的，我在中山

我在佛山的，也很近啊
有空过来佛山找我出来啊

作者: smilingkiss 时间: 2014-4-9 14:48

盗梦发表于 2014-4-9 11:01
是的，我在中山

2808336
这是我的qq号码

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)