Alt8.SetFocus
Alt8!Kelime.SetFocus
DoCmd.FindRecord Metin0, acAnywhere, False, acSearchAll, False, acAll, True
If DCount("anlamı", "Tablo1", "[kelime] = " & Chr(34) & Metin0 & Chr(34)) = 1 Then Metin4 = Alt8!anlamı Else: Metin4 = "bulunamadı"
kod içerisinde "Docmd" mevcuttur.