[VB6 ] 可以幫我看一下嗎

[Mafty ()]

Dim conditionString As String
    conditionString = Text1.Text
    If Combo1.Text = "書名" Then
        Select Case Combo2
            Case "="
            rs.filter = Combo1.Text & Combo2.Text & "'" & conditionString & "'"
            Case "Like"
            rs.filter = "書名 Like '***'"
        End Select
    Else
        rs.filter = Combo1.Text & Combo2.Text & conditionString
    End If

Like的地方是那裡出錯了??總是沒法查出東西來
可是改成rs.filter = "書名 Like '*山*'"就能查出資料裡有山的資料
所以如果不寫死要怎麼作??

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 59.112.185.182