Bu durumda Dlookup komutu derde çare olur. Elbette listekutusu veya açılan kutuya da ihtiyaç kalmaz. Buyrun o zaman:
Metin25 = Dlookup ("[evre]", "[EVRET]", "[sayi]=" & Me.Metin18)
Bu arada hem tablo adı hem de alan adı "evre" olduğu için karışmasın diye tablo adını EVRET olarak değiştirdim.

İnadına, ille de Accesstr.net...