Not finding Records

[Bob Vance]

My listbox [lstModify]contains a field [ClientDetail] but my combo box
cmbFindClients is not finding the records , does my Code look OK?

Private Sub cmbFindClients_AfterUpdate()
Me!lstModify.RowSource = "SELECT * FROM qryClientInvoice Where
[ClientDetail] Like " & Me.cmbFindClients
If Me!lstModify.ListCount = 0 Then
MsgBox "Sorry, there's nothing for " & Me.cmbFindClients.Column(1)
End If
End Sub

 

[Bob Vance]

Thanks to Allen Brownes Site got it

Private Sub cmbFindClients_AfterUpdate()
Me!lstModify.RowSource = "SELECT * FROM qryClientInvoice Where
[ClientDetail] = """ & Me.cmbFindClients & """"


If Me!lstModify.ListCount = 0 Then
MsgBox "Sorry, there's nothing for " & Me.cmbFindClients.Column(1)
End If
End Sub