AccessTr.neTMicrosoft AccessAccess Cevaplanmış Soruları

Kayıt Saydırma

12/04/2020, 18:27

Gunalp Gunal

merhabalar arkadaslar... bir adet ingilizce kelıme calısma uygulaması uzerıne calısıyorum bir metin kutusunda dogru cevap verildikce otomatık bir bir sayıların artmasını ıstıyorum yardımcı olabılecek varmıdır?

https://dosya.co/hb3a0thrat3d/YDS_Sözlük.accdb.html
13/04/2020, 17:32

ozanakkaya

cevapla butonunun tıklandığında olayındaki kodu aşağıdaki ile değiştirerek deneyiniz.

Kod:
If answer_adj = DLookup("word", "adjectives", "Kimlik=" & adj_id) Then
result_adj.Value = "C O R R E C T"
result_adj.ForeColor = vbGreen
true_ans = Nz(true_ans, 0) + 1
Else: result_adj.Value = "F A L S E"
result_adj.ForeColor = vbRed
false_ans = Nz(false_ans, 0) + 1
End If
15/04/2020, 03:27

Gunalp Gunal

hocam çok teşekkür ederim biraz geç cevap verebildim kusura bakmayın...
16/04/2020, 18:15

Gunalp Gunal

Hocam bir sorum daha olacaktı... Doğru bilinen kaydın bir daha sorulmamasını nasıl sağlayabilirm acaba? İnternette taradım biraz fakat işime yarayacak bir yöntem bulamadım yardımcı olabilirseniz sevinirim...
@ozanakkaya