semplicemente tu gli stai dicendo di cercare un ID tipo dato numerico che sia uguale ad un ID tipo dato stringa, è per questo che ti da errore.
scrivi così:
codice:
"and (idprodotto = " & clng(labelid.caption & ")"