VB查询怎样写代码

来源：百度知道 编辑：UC知道 时间：2024/05/31 08:05:51
在ACCESS中利用表设置了窗口。，由于数据越来越多，有时候需要查看某些数据，就要用到查询过滤。弄了个组合框，里面有过滤的对象。怎样选了其中一个对象后就立刻过滤。代码要怎样写？
我要的是输入对象。逻辑.+条件完成的过滤搜索。

想学VB我教你呀。
代码如下：
On Error Resume Next
If Combo1.Text = "" Then
datagrid1.visible=false

Else

Dim cnn1 As ADODB.Connection
Dim rs1 As ADODB.Recordset
Dim s1 As String

Set cnn1 = New Connection

s1 = "select * from customer where 省份 like '%" & Trim(Combo1.Text) & "%' order by 更新的时间 desc "

cnn1.Provider = "Microsoft.Jet.OLEDB.3.51"

cnn1.Open App.Path & "\customer.mdb"

Set rs1 = New Recordset
rs1.CursorLocation = adUseClient

rs1.Open s1, cnn1, adOpenStatic, adLockReadOnly

Set DataGrid1.DataSource = rs1

2楼写的知识查询哦，没有涉及过滤哈

0分问这个问题吗?