2016-01-27 2 views
1

У меня есть этот код:VBA LIKE оператор шпагатом

Private Sub Item_AfterUpdate() 
Me.SApp.Form.RecordSource = "SELECT * FROM Application WHERE Item = '" & Me.Item.Value & "';" 
End Sub 

Теперь, это работает так, что фильтры Сапп (подчиненная) база по значению в поле со списком пункта. Я хочу сделать что-то подобное, но не с равным, а с подобным. Так, что-то вроде:

Private Sub Item_AfterUpdate() 
Me.SApp.Form.RecordSource = "SELECT * FROM Application WHERE Item LIKE '" & Me.Item.Value & "';" 
End Sub 

Я пробовал:

'% Me.Item.Value %' 

'% '" & Me.Item.Value & "' %' 

'% s %' with (Dim s as string ; s = Me.Item.Value) 

Ни одно из этих решений не работает, ни малейшего представления о том, как это исправить?

+1

ли это 'Me.SApp.Form.RecordSource = "SELECT * FROM Application WHERE Item LIKE «*" & Me.Item.Value & "*'; "' помочь – shahkalpesh

+1

OK, это работает, вы? Спасибо, спасибо – nescionomen93

ответ

1

Используйте * wildcard в MsAccess, в других dbs обычно%.

Ref: https://msdn.microsoft.com/en-us/library/bb208897(v=office.12).aspx

+0

Я попытался положить * вместо%, но ничего. Похоже, у него возникла проблема с идентификацией строки в строке (внутри строки запроса) – nescionomen93

+0

У вас она работает с '*'? –

Смежные вопросы