我想做多个查询条件，
使用的是adodc控件和DataGrid控件

多条件就是比如我输入种类和价格，能查询出同时符合2个条件的内容，而且在只输入一个条件的时候也能对一个条件做查询，数据库的SQL

我原来自己做过一个用网格视图做的数据库显示（ocx)控件，用SQL语句就可以比如查询时可以这么写。

select * from tablename where 种类=图书 and 价格=85

用and来连接。

楼上的好像不能实现楼主的功能吧？ 定义一个局部变量就好了,good luck! dim str as string str="" if text1.text="" and text2.text="" then msgbox "请输入查询条件" exit sub end if

if text1.text<>"" then str=str+ " and 种类='"+ text1.text+ "'" end if

if text2.text<>"" then str=str+ " and 价格='"+ text2.text+ "'" end if

adodc1.recordsource="selsect * from tablename where 1=1 "+ str

我试试，谢谢朋友们的帮助

还，找到了，高啊，用了一个 WHERE 1=1
我找了好长时间如何解决多查询问题，以前用ArrayList来存储条件，在判断来创建查询条件，麻烦啊，现在好了，谢谢了


能不能问一下那里有分页控件啊，而且能够实现多条件查询的，就想该页面的分页功能一样，能不能提供一下代码啊，谢了

SQL = "SELECT * FROM 入库记录 t"
If Text2.Text <> "" Then
SQL = SQL + " where 接收单位 in(select 企业名称 from 企业名称 where 企业简码 like '%" & Text2.Text & "%') "
mmnn = True
End If

If Text3.Text <> "" And IsDate(Text3.Text) Then
If mmnn Then
SQL = SQL + " and 日期>= '" & Text3.Text & "' "
Else
SQL = SQL + " where 日期>= '" & Text3.Text & "' "
End If
mmnn = True
ElseIf Text3.Text <> "" Then
MsgBox "请双击本输入框，使用日历输入！"
Text3.Text = ""
MonthView1.Visible = True
End If
If Text4.Text <> "" And IsDate(Text4.Text) Then
If mmnn Then
SQL = SQL + " and 日期<= '" & Text4.Text & "' "
Else
SQL = SQL + " where 日期< ='" & Text4.Text & "' "
End If
mmnn = True
ElseIf Text4.Text <> "" Then
MsgBox "请双击本输入框，使用日历输入！"
Text4.Text = ""
MonthView1.Visible = True
End If

If Text5.Text <> "" Then
If mmnn Then
SQL = SQL + " and 销售id in(select id from 销售记录 where 销售人 like '%" & Text5.Text & "%') "
Else
SQL = SQL + " where 销售id in(select id from 销售记录 where 销售人 like '%" & Text5.Text & "%') "
End If
mmnn = True
End If
这是我写的一个多条件的查询(只是一部分,你可以根据我的方法任意个多条件都是可以的)