AccessTr.neT

Örneğimde frmOgrencı_ders form da vize_notu ve final_notu ortalamasını sonuc kutusuda nasıl gorebılırım.Sitede biraz araştırdım ama yapamadım yardım edermısınız. Nasıl yapıldıgınıda bıraz açıklarmısınız lutfen şimdiden teşekkurler.

Ek Dosyalar

_Öğrenci.rar(106.67 KB)

vizenin ve finalin yüzdesi şeklindemi(ayrı ayrı hesaplayıp) yoksa vize ve finalin toplamının alıp ortalamamı aldırmak istersin?

ben vizen notunun %30 'u final notununda %70'i şeklinde hesapladım(bizim zamanımızda öyleydi)
form_frmogrenciDers formunun kodlarına aşağıdaki kodları ekle

Private Sub Final_Notu_AfterUpdate()

hesapla

End Sub



Private Sub Vize_Notu_AfterUpdate()

hesapla

End Sub

Sub hesapla()

Dim vize

Dim final

Dim Sonuc

vize = (Me.Vize_Notu.Value * 30) / 100 'vize notunun %30 al

final = (Me.Final_Notu.Value * 70) / 100 'final notunu %70 al

Sonuc = vize + final 'sonuc değişkenine hesaplanan değerleri hesapla

Me.Sonuc.Value = Sonuc 'formundaki sonuç alanına değeri yazdır.

If Sonuc >= 50 Then Me.Durumu.Value = "GEÇTİ": Exit Sub 'sonuç 50 ye eşit yada büyükse formun üstündeki durumu alanına "geçti yaz"

If Sonuc <= 49 Then Me.Durumu.Value = "KALDI": Exit Sub  ''sonuç 50 den küçükse formun üstündeki durumu alanına "kaldı yaz"

End Sub

Umarım anlatabilmişimdir
kolay gelsin

teşekkürler işime yaradı..