写在前面
怎么说呢,之前的组合查询,现在想起来都是很痛心的,刚开始我单蠢的想要用case语句来查,于是我硬着头皮往下写,结果呢,一个条件还没有查出来的时候,我的case语句就用了20多个了,于是我果断放弃了这个方法,看这么多的case,我还是很头晕的,实现一个功能重复使用一个代码数量超过一定的界限那就是很有问题的。
和之前的学习进行对比
dd(1) = True
If dd(0) Then
txtSQL = txtSQL & "and student_Name = '" & txtName.Text & "'"
Else
txtSQL = txtSQL & "student_Name = '" & txtName.Text & "'"
End If
上面只是一部分的代码,但是足以说明问题了,这里的查询语句,相当于在原来的基础上再加查询条件,或许是所谓的拼接查询了,关键在与什么呢,就是要明确你的查询条件什么时候加,处理好这个就没有什么问题了。
要实现的功能是这样的:
- 之前我们用到的查询语句是这样的:
txtsql = "select * from 表名称 where 列名称 = '" & 查询条件 & "'"
txtsql = txtsql & "and 列名称 = '" & 查询条件 & "'"
对比产生查询语句
例如现在从上机表中查找
- 条件一:
txtsql = "select from line_info where ( " & combocondition1.tag & combooperate1.tag & " '" & content1.text & "'"
- 条件二
if comboRelation1.text <> "" then
txtsql = txtsql & " " & comboRelation1.tag & " " & combocondition2.tag & combooperate2.tag & " '" & content2.text & "'"
end if
txtsql = txtsql & ")"
上面这里为什么要加一个括号呢,之前的组合查询的条件一直出错,比如上面的条件是:A 或 B 与 C 这是有先后顺序的,但是and优先级大于or,这样的话,我们应该怎么办呢,加一个括号就可以了(A or B)and C,上面的括号就是这个道理。
- 条件三
if comboRelation2.text <> "" then
txtsql = txtsql & " " & comboRelation1.tag & " " & combocondition3.tag & combooperate.tag & " '" & content3.text & "'"
end if
结束语
有很多方法,我们学习的时候要对比着学,基本的语句可以实现很强大的功能,就是看你要如何去变换一下,学着多总结,多使用,同时也要多想别人学习,学会利用更多的资源。