Acil Ücretli Veya Ücretsiz Yardım Visual Basic 6.0!

Merhabalar arkadaşlar, bir öğrenci bilgi sistemi yapmam gerekiyor. Herşeyi yaptım bir tek txt'ye veri kaydedip oradan veri alma işlemini yapamadım.

Bu konu hakkında acil yardımlarınızı bekliyorum. Program kodlarını da atayım ben size.

Private Sub Command1_Click()
Text1.Text = ""
Text2.Text = ""
Combo1.Text = ""
Combo2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
End Sub

Private Sub Command2_Click()
Text5.Text = (Val(Text3.Text) + Val(Text4.Text)) / 2

If Val(Text5.Text) < 45 Then Label8.Caption = ("KALDI")

If Val(Text5.Text) >= 45 Then Label8.Caption = ("GEÇTİ")
End Sub

http://www.frmtr.com/visual-basic/31...yazdirmak.html

Göz atmanızı tavsiye ederim.

hocam daha ayrıntılı şekilde kodları nasıl düzenleyeceğimi de yazar mısınız.

linkteki olayın ne yaptığını ayrı bi projede dene. yani frmtr nereye yazıyo txtde neroyu nereye yazıyo gör, ona göre düzenlersin.