listbox Error

[abusaif]

I created a listbox which is showing records from my query. now on double click i want it open employee edit form. My Code is as follow

Private Sub lvwEmployees_DblClick(Cancel As Integer)
Dim strA As String
Dim strB As String


strA = "frmEmployees"


strB = "[CardNo]=" & Me.[lvwEmployees]

DoCmd.OpenForm strA, , , strB

End Sub
Its popping up an error message " Syntax error (missing operator) in query expression '[CardNo]="1510'.
Can any body help please?

[RuralGuy]

Sounds like your CardNo might be a string. Try:
strB = "[CardNo]='" & Me.[lvwEmployees] & "'"

[abusaif]

Yes it worked thanks a lot friend.

[RuralGuy]

You're welcome. Glad we could help.