[VB6 ] 可以幫我看一下嗎
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
討論串 (同標題文章)
完整討論串 (本文為第 1 之 2 篇):