多条件查询-CSDN论坛

⋅谁可以给我一个access写好的程序吗 ⋅vb6.0中怎么把查询到的内容显示到combo中 ⋅多条件查询 更多帖子 关注私信空间博客 chenlujing99 本版专家分：25 结帖率 66.67%: vb中怎么把下面的查询变成一个查询或者用for 语句也行只要并到一起就行

sql = "select * from A线表_temp where 姓名 like'" & List2.List(0) & "'"
sql = "select * from A线表_temp where 姓名 like'" & List2.List(1) & "'"
sql = "select * from A线表_temp where 姓名 like'%" & List2.List(2) & "%'"
sql = "select * from A线表_temp where 姓名 like'%" & List2.List(3) & "%'"
sql = "select * from A线表_temp where 姓名 like'%" & List2.List(4) & "%'"
sql = "select * from A线表_temp where 姓名 like'%" & List2.List(5) & "%'"
sql = "select * from A线表_temp where 姓名 like'%" & List2.List(6) & "%'"
sql = "select * from A线表_temp where 姓名 like'%" & List2.List(7) & "%'"
sql = "select * from A线表_temp where 姓名 like'%" & List2.List(8) & "%'"

0 2012-02-22 13:47:36

回复数 12 只看楼主引用举报楼主

⋅bdmh的留言板

⋅Android:都是Layout的BaselineAligned惹的祸

⋅ListView中Button无法点击

更多帖子

关注私信空间博客

bdmh

本版专家分：219782

版主

签到新秀 累计签到获取，不积跬步，无以至千里，继续坚持！

名人 2019年荣获名人称号
2013年荣获名人称号

状元 2012年总版技术专家分年内排行榜第一

进士 2013年总版技术专家分年内排行榜第七
2011年总版技术专家分年内排行榜第五
2009年总版技术专家分年内排行榜第九: 把List2.List(0)拿出来放到循环里，最后拼出来多个like，或者写个存储过程

0 2012-02-22 13:53:02

只看TA 引用举报 #1 得分 0

艾米01 本版专家分：78: lz不是说用for的么，循环一下就好了的。

0 2012-02-22 14:09:21

只看TA 引用举报 #2 得分 0

chenlujing99 本版专家分：25: 我不会写啊谁能帮我写下吗

0 2012-02-22 14:37:05

只看TA 引用举报 #3 得分 0

⋅谁可以给我一个access写好的程序吗 ⋅vb6.0中怎么把查询到的内容显示到combo中 ⋅多条件查询 更多帖子 关注私信空间博客 chenlujing99 本版专家分：25: 比如 list（0）= 小明 list（1）=小红 list（2）=小黄
然后查询人员表里面的小明小红小黄然后查询显示出他们的数据

0 2012-02-22 14:41:19

只看TA 引用举报 #4 得分 0

⋅webuploader控件在IE8下没反应 ⋅攒人品, 抢红米 ⋅我日, 我就不信抢不到红米 更多帖子 关注私信空间博客 ruanwei1987 本版专家分：9230: 。。。。。。。。。。。。LZ加油看好你，这个不难
stringBuilder sql = new stringBuilder ();
sql.Append(string.Format("select * from A线表_temp where 姓名 like '&{0}&' ",List2.List(i)));
sql.Append("\n")

放到你循环里面，最后执行 sql

0 2012-02-22 14:46:57

只看TA 引用举报 #5 得分 5

⋅谁可以给我一个access写好的程序吗 ⋅vb6.0中怎么把查询到的内容显示到combo中 ⋅多条件查询 更多帖子 关注私信空间博客 chenlujing99 本版专家分：25: Private Sub Command8_Click()
Dim i As Integer
  Dim ltmX As ListItem
  Dim rs As New ADODB.Recordset
Dim sql As String

For i = 0 To List2.ListCount - 1
sql="select * from A线表_temp where 姓名 like '&{0}&' ",List2.List(i)
Next
rs.Open sql, cn, adOpenStatic, adLockOptimistic
End Sub

好像不对啊在帮我看看吧

0 2012-02-22 16:31:27

只看TA 引用举报 #6    得分 0

⋅请教一个gridview 数据绑定和隐藏列的问题 ⋅求一句查询语句的写法 ⋅请教读取cookie的问题 更多帖子 关注私信空间博客 dabuyingyeyaoda 本版专家分：278

仅供参考



dim sql = "select * from A线表_temp where "



for i as integer = 0 to 8

if i = 0 then

sql = sql & "姓名 like'" & List2.List(i) & "'"

else

sql = sql & " or 姓名 like'" & List2.List(i) & "'"

end if

next

0 2012-02-22 17:35:12

只看TA 引用举报 #7 得分 20

⋅谁可以给我一个access写好的程序吗 ⋅vb6.0中怎么把查询到的内容显示到combo中 ⋅多条件查询 更多帖子 关注私信空间博客 chenlujing99 本版专家分：25: 还是不行 FOR 这条语句是红色的
Dim i As Integer
  Dim ltmX As ListItem
  Dim rs As New ADODB.Recordset
Dim sql As String

for i as integer = 0 to 8
If i = 0 Then
sql = "select * from A线表_temp where  姓名 like'" & List2.List(i) & "'"
Else
sql = "select * from A线表_temp where or 姓名 like'" & List2.List(i) & "'"
End If
Next

rs.Open sql, cn, adOpenStatic, adLockOptimistic

0 2012-02-23 08:37:20

只看TA 引用举报 #8    得分 0

⋅请教一个gridview 数据绑定和隐藏列的问题 ⋅求一句查询语句的写法 ⋅请教读取cookie的问题 更多帖子 关注私信空间博客 dabuyingyeyaoda 本版专家分：278: 那个是vb.net的用法，你vb6分开吧

dim i as integer = 0

for i to 8
...
next

0 2012-02-23 09:25:15

只看TA 引用举报 #9 得分 5

chenlujing99 本版专家分：25: 不行还是红色的

0 2012-02-23 11:24:23

只看TA 引用举报 #10 得分 0

⋅日期顺延问题 ⋅适用于.NET发邮件验证码的企业邮箱 ⋅求免费的企业邮箱！ 更多帖子 关注私信空间博客 huayy 本版专家分：4781: sql = "select * from A线表_temp where 姓名 like '" & List2.List(0) & "' or 姓名 like '" & List2.List(1) & "' or 姓名 like '" & List2.List(2) & "' or 姓名 like '" & List2.List(3) & "' "

不过你的like ，似乎应该要加百分号。不然就相当于=了.

0 2012-02-23 13:32:00

只看TA 引用举报 #11 得分 10

chenlujing99 本版专家分：25: 还是不对啊我换了种方法解决了就是麻烦了点谢谢大家

0 2012-02-24 11:47:20

只看TA 引用举报 #12 得分 0

多条件查询 [问题点数：40分，结帖人chenlujing99]