墨西哥签证多少久时间:vb中的like语句查询问题

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/30 01:54:46
在查询中我想用like语句,请各位大虾帮修改:
Private Sub Cmdquery_Click() '查询
Dim strSql As String
If Combo2.Text = "查询内容" Then
MsgBox "请选择查询选项字"
Combo2.SetFocus
Exit Sub
End If
If Combo1.Text = "请选择关键字" Then
MsgBox "请选择查询选项"
Combo1.SetFocus
Exit Sub
End If
Me.MSHFlexGrid1.Clear
If Combo1.Text = "孔号" Then
strSql = "Select * from zk1 where 1=1 "
Select Case Combo1.ListIndex
Case 0
strSql = strSql & " and 孔号='"
End Select
'连上模糊条件
strSql = strSql & Combo2.Text & "'"
End If
rs2.Open strSql, cnn, adOpenDynamic, adLockOptimistic
Set MSHFlexGrid1.DataSource = rs2
Call MSHGridset
rs2.Close
Set rs2 = Nothing
End Sub

不知道你要在哪里查like

where 1=1 是什么意思?

把=改成like '*"& combo2.text & "*'

like 语句是这样用的
select * from table where XX like '%xx%'