注册 登录
编程论坛 VB6论坛

【求助】利用VB界面查询ACCESS数据库,共分两步查询,求大神

abeanderson 发布于 2015-12-18 19:31, 2044 次点击
我自己编辑了一个VB界面,里面共有5个combo输入,2个text输入。现在想分两步利用VB去查询access数据库里的数据,第一步是利用5个combo输入值查询数据库中的数据,第二步是在第一步查询得到的数据基础上,将text1+text2的最大值作为查询条件,再进行第二次查询,最终得到一个数据。
目前第一步已经完成,就是不知道第二步查询该怎么编代码,求大神指点一二。
以下是第一步的程序:
Private Sub Command1_Click()
'Dim sql As String
Dim p, s, H, z, theat As String
z = Combo1.Text
theat = Combo2.Text
p = Combo3.Text
s = Combo4.Text
H = Combo5.Text
Dim connstring As String
    connstring = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\VB\database.mdb;Persist Security Info=False"
    Adodc1.ConnectionString = connstring
    = adCmdText
    Adodc1.RecordSource = "select * from cam where gzs=" & z & " and dcj=" & theat & " and xx='" & p & "' and sych='" & s & "'and ts=" & H & ""
    Adodc1.Refresh
    Set DataGrid1.DataSource = Adodc1
End Sub
4 回复
#2
Artless2015-12-19 01:31
为什么分两步
#3
xiangyue05102015-12-19 19:56
也是没有明白为何要分成两步
#4
风吹过b2015-12-19 20:47
子查询会不会?
把第一步的SQL命令保存起来,然后当作第二步的子查询进行查询就是了。




[此贴子已经被作者于2015-12-19 20:52编辑过]

#5
风吹过b2015-12-20 09:57
还有就是保存第一次的查询条件,然后加上第二次的条件,形成第二次的查询结果 。
1