Skip to main content

AccessTr.neT


Formda Tabloya Göre Veri Gösterme

Formda Tabloya Göre Veri Gösterme

Çözüldü #13
(10/02/2011, 17:32)exceLLency yazdı: İstemiş olduğum formda bu sınav sonuçlarını gösterirken , öğrenci eğer 2. eğitim grubuna katılmış ve sınavlarına girmiş ise ekranda göstermek,......
cümlesinden anladığım kadarıyla, Yandemir'in verdiği kodu vb sayfasına aşağıdaki gibi ekleyip;
Sub HesaplaGoster()
If gecme.Value >= 50 Then
egitim2sinav1.Visible = False
egitim2sinav2.Visible = False
egitim2sinav3.Visible = False
egitim2sinav4.Visible = False
Else
egitim2sinav1.Visible = True
egitim2sinav2.Visible = True
egitim2sinav3.Visible = True
egitim2sinav4.Visible = True
End If
If egitim2sinav1 Or egitim2sinav2 Or egitim2sinav3 Or egitim2sinav4 <> "0" Then
egitim2sinav1.Visible = True
egitim2sinav2.Visible = True
egitim2sinav3.Visible = True
egitim2sinav4.Visible = True
Else
egitim2sinav1.Visible = False
egitim2sinav2.Visible = False
egitim2sinav3.Visible = False
egitim2sinav4.Visible = False
End If
End Sub

diğer kodlara da
Private Sub egitim1sinav1_AfterUpdate()
Call HesaplaGoster
End Sub

Private Sub egitim1sinav2_AfterUpdate()
Call HesaplaGoster
End Sub

Private Sub egitim1sinav3_AfterUpdate()
Call HesaplaGoster
End Sub

Private Sub egitim1sinav4_AfterUpdate()
Call HesaplaGoster
End Sub

Şeklinde kullanmanız daha doğru olacak.
Cevapla
Çözüldü #14
Hocam anladığım kadarı ile her sınav için geçme diye bir tablo oluşturup oraya puan yazdırıcam .Teşekkür ederim.
(14/02/2011, 13:20)Yandemir yazdı: Private Sub Form_Current()
If Me.gecme >= 50 Then
Me.egitim2sinav1.Visible = True
Me.egitim2sinav2.Visible = True
Me.egitim2sinav3.Visible = True
Me.egitim2sinav4.Visible = True
Else
Me.egitim2sinav1.Visible = False
Me.egitim2sinav2.Visible = False
Me.egitim2sinav3.Visible = False
Me.egitim2sinav4.Visible = False
End If
End Sub

Cevapla
Çözüldü #15
Öğrenciler arasında geçiş yaptığım zaman ekran update olmuyor , önceki öğrencide pasif olan kısım tekrar aktif olmuyor.
Cevapla
Çözüldü #16
Yardımlarınız için teşekkür ederim, sorun çözümlenmiştir.
Cevapla
Çözüldü #17
Private Sub Form_Current()
demek ekrandaki kayıt geçerli olduğunda demektir yani her kayıt değişiminde buraya bakar. me.gecme ekrandaki hesapladığın alan notları girip ortalamasını aldığın yer. kayıt ekrana geldiğinde buraya hesaplama değeri gelecek ve 50 den büyük veya eşitse yandaki sütunları açacak veya kapayacak. pratik çözümü bu.
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)

+rep Yollar biter Access bitmez. +rep
Cevapla
Çözüldü #18
Teşekkür ederim sorunu çözdüm, bütün tabloları birbirine zincirledim tam istediğim gibi oldu.
(15/02/2011, 14:46)Yandemir yazdı: Private Sub Form_Current()
demek ekrandaki kayıt geçerli olduğunda demektir yani her kayıt değişiminde buraya bakar. me.gecme ekrandaki hesapladığın alan notları girip ortalamasını aldığın yer. kayıt ekrana geldiğinde buraya hesaplama değeri gelecek ve 50 den büyük veya eşitse yandaki sütunları açacak veya kapayacak. pratik çözümü bu.

Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da