Tablodaki Verilerle Eşleşiyorsa Mesaj Ver

forum arkadaşlarım merhaba
aşağıda takıldığmı bir soruya cevap arıyorum, 
örnek ekledim, 
tamam butonuna tıklandığında, 3 açılan kutulardan herhangi birinde tablo1 deki verilerden birisi varsa mesaj verdirilebilirmi?

Merhaba, a1 için gerekli kod

If Nz(DLookup("id", "Tablo1", "[adi]='" & Me.a1 & "'"), 0) > 0 Then



MsgBox (Me.a1 & " ürünü var")



End If

(09/12/2019, 15:08)ozanakkaya yazdı: Merhaba, a1 için gerekli kod

If Nz(DLookup("id", "Tablo1", "[adi]='" & Me.a1 & "'"), 0) > 0 Then



MsgBox (Me.a1 & " ürünü var")



End If

a1,a2 ve a3 için aşağıdaki gibi düzenledim,


teşekkürler,