Iza lblracun.caption= bi trebalo upotrebiti funkciju DLookUp().
DLookUp("[polje za prikaz]", "[referentna tabela]", "<Uslov za trazenje>")
Uslov za trazenje je "[Polje u referentnoj tabeli] = ' <primer vrednosti>'''
Ovaj uslov je sve ono što je iza tvoje klauzule WHERE u upitu.
Tačna sintaksa u uslovu zavisi od tipa podatka polja za prikaz.