对于组合查询，真的是“费劲苦难”，当然也只是玩笑话，下边谈谈自己拼接字符串的办法吧！当然对于泛型集合的学习，详情《泛型集合，解决Datatable强耦合》
首先我们要明确声明一个实体层，定义组合查询为实体类，将"字段，操作符，组合关系分别设为实体类combinQuery的属性
'字段1
Private _ComboFileName1 As String
Public Property ComboFileName1() As String
Get
Return _ComboFileName1
End Get
Set(value As String)
_ComboFileName1 = value
End Set
End Property
'字段2
Private _ComboFileName2 As String
Public Property ComboFileName2() As String
Get
Return _ComboFileName2
End Get
Set(value As String)
_ComboFileName2 = value
End Set
End Property
…………看U层：
Private Sub btnQuery_Click(sender As Object, e As EventArgs) Handles btnQuery.Click
'combinQuery_m ，定义一个实体
Dim combinQuery_m As IList(Of Entity.RegisterEntity) '定义泛型集合
Dim combinQuery_bll As New BLL.StusInfoMainBLL '定义一个B层接口
Dim combinQuery As New Entity.CombinQueryEntity '定义一个实体，作为参数
Dim table As String = "T_student" '用到的表，与学生表联系起来
Dim arrayControl(2) As Control
'给参数赋值
With combinQuery
'将查询条件字段1的值赋给实体combinQuery_m的字段1ComboFileName1属性
.ComboFileName1 = ComboFileName1.Text.Trim()
.ComboFileName2 = ComboFileName2.Text.Trim()
.ComboFileName3 = ComboFileName3.Text.Trim()
''将操作符1的值赋给实体combinQuery_m的操作符1ComboSign1属性
.ComboSign1 = ComboSign1.Text.Trim()
.ComboSign2 = ComboSign2.Text.Trim()
.ComboSign3 = ComboSign3.Text.Trim()
'将查询内容1的值赋给实体combinQuery_m的查询内容1txtInqure1属性
.txtInqure1 = txtInqure1.Text.Trim()
.txtInqure2 = txtInqure2.Text.Trim()
.txtInqure3 = txtInqure3.Text.Trim()
'将组合关系1的值赋给实体combinQuery_m的组合关系1ComboRelation1属性
.ComboRelation1 = ComboRelation1.Text.Trim()
.ComboRelation2 = ComboRelation2.Text.Trim()
End With
combinQuery_m = combinQuery_bll.StusInfo(table, combinQuery)
DataGridView1.DataSource = combinQuery_m '查询到的集合我们还要将字符串转化，给字段，操作符，组合关系等分别赋值
将查询字段（1,2,3）对应于”表“的字段（eg: cardNo），操作符对应于关系运算符，组合关系对应于逻辑运算符(or/and)
看部分代码：
'字符串转换
'给字段1赋值
Select Case (combinQuery.ComboFileName1)
Case "卡号"
combinQuery.ComboFileName1 = "cardNo"
Case "学号"
combinQuery.ComboFileName1 = "studentNo"
Case "姓名"
combinQuery.ComboFileName1 = "studentName"
Case "性别"
combinQuery.ComboFileName1 = "sex"
Case "年级"
combinQuery.ComboFileName1 = "Grade"
Case "班级"
combinQuery.ComboFileName1 = "sclass"
End Select
'操作符1
Select Case combinQuery.ComboSign1
Case "="
combinQuery.ComboSign1 = "="
Case ">"
combinQuery.ComboSign1 = ">"
Case "<"
combinQuery.ComboSign3 = "<"
Case "<>"
combinQuery.ComboSign1 = "<>"
End Select
'组合关系1
Select Case combinQuery.ComboRelation1
Case "或"
combinQuery.ComboRelation1 = "or"
Case "与"
combinQuery.ComboRelation1 = "and"
End Select '''
''' 生成组合查询sql语句-拼接sql字符串
'''
'''
''' combinQuery实体
''' Private clsSqlhelper As DAL.sqlhelper = New DAL.sqlhelper() '声明并实例化
'''
''' 泛型集合,组合查询
'''
'''
'''
''' '声明并实例化Factory为DataAccess类
Private ReadOnly factory As DataAccess = New DataAccess
Public Function StusInfo(ByVal data As String, ByVal StusQuery As Entity.CombinQueryEntity) As IList(Of Entity.RegisterEntity)
'声明并实例化变量InterfaceUser为：调用Factory.CreateUserDAL()所返回来的IUser
Dim comboQuery As IStusInfoMainDAL = factory.StusInfoMain()
Dim StusMain As IList(Of Entity.RegisterEntity) '定义一个泛型集合
StusMain = comboQuery.StuInfoQuery(data, StusQuery)
Return StusMain
End Function