Yukarıda eklediğim resimde formun görüntüsü var.
Kelime kısmına bir kelime girilecek. Ara butonuna bastığımızda o kelimeyi tabloda arayacak varsa hemen altındaki tex de anlamı yazacak. Yalnız arama işleminde Docmd komutu kullanılacak.
Yardımınız için şimdiden teşekkürler...
Lütfen hazırlamış olduğunuz örneği ekleyiniz.
örneği yüklemeye çaılştm ama dosya türü mdb yi desteklemiyo dio
(10/03/2012, 23:57)ozzy yazdı: örneği yüklemeye çaılştm ama dosya türü mdb yi desteklemiyo dio
Sıkıştırma programları ile sıkıştırarak yüklemelisiniz.
Komut13'ün tıklandığında olayına aşağıdaki kodu ekle
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.