Text box(Metin Kutusu)'da soru işaretli kısımları kaldırdım.
Metin kutusu içerisine Dlookup komutu yazarak tablodan istediğim değerleri aldım.
Örnek olarak:
Hat Adı Kutusu: =DLookUp("[Hat Adı]";"[Makina Listesi]";"[Makina No]=" & [Makina No]) Makina listesi tablosunda Hat Adı sütunundan Makina No değerine göre veriyi al.
Düzenlenmiş proje ektedir.

Ben Dlookup komutunu Metin kutusunun içerisine değilde Visual Basic kodlarıyla nasıl yapabilirim? "Hat No" kutusuna VB ile taşıma işlemi yaptım. Fakat Metin kusuna tıklayınca kod çalışıyor ve değer geliyor.
Olması gereken her zaman bu kodun çalışması. Yani örnekte olduğu gibi otomatikman değerin gelmesi. Kodu sürekli nasıl çalıştırabilirim?