NOT HESAPLAMA PROGRAMI

[ayucel1982]

Merhaba,
Ben bir not hesaplama programı yapmaya karar verdim.
Program hakkında kısa bilgi,
Alanlar:
İki adet form olacak: UserForm1, UserForm2
Kullanıcı programı çalıştırdığı zaman karşısına direk Userform1 gelecek yani kullanıcı Excel le muhattap olmayacak.
User form1 de listeden öğrenciyi seçip sınav sonuçlarını yazacak ve otomatik olarak not hesaplanacak.
Userform2 öğrenci bilgileri yani öğrenci numarası ve öğrenci adı olacak
Userform1 'de kullanıcı Açılır listeden (sanırım Combotext olacak) Ã?ğrenci numarasını seçtiğini zaman öğrenci adı otomatik gelecek ve imleç Dersler bölümünden 1.sınav(Label) altında bulunan Textbox a odaklanacak
Bunun için Dersler, 1.Sınav, 2.Sınav, 3.Sınav, Sözlü Ortalama ve Not bölümleri olacak.

Kullanıcı girdiği öğrencileri kaydedebilecek. Ã?ğrenci notlarını kaydedebilecek.

Eğer elinizde örnek bir program var ise incelemek için gönderirseniz sevinirim.
Münkünse eğer kodları açık olabilir mi?

 

[ALPEN]

not nasıl hesaplanacak? (%20 ilk vize, %30 ikinci vs.)

 

[ayucel1982]

Dersler 1.Sınav 2.Sınav 3.Sınav Ortalama Not
Matematik 100 100 100 100 5
türkçe
fen
diğer

bu şekilde olacak
Formül Ortalama: (1.Sınav+2.Sınav+3.Sınav)/3)
Formül Not =Eğer(Ort=100;5);Eğer(Ort=90;4) gibi olabilir
ama bu çalışma Userformlarda yapılacak

 

[class37]

Merhaba
Private Sub CommandButton1_Click()
TextBox1.Value = (Val(TextBox2.Value) + Val(TextBox3.Value) + Val(TextBox4.Value)) / 3
If TextBox1.Value = 100 Then
TextBox5.Value = 5
Exit Sub
End If
If TextBox1.Value = 90 Then
TextBox5.Value = 4
Exit Sub
End If

End Sub