Öğrenci Not Hesaplama VB.Net

Bu örnekte kullanıcı tarafından girilen öğrenci notlarının ortalamasını hesaplanmasını öğreneceğiz.İlk önce bir forum açıp ve bir buton ekliyoruz. 

Daha sonra “Tıkla Hesapla” isimli button’un içine şu kodları yazıyoruz; 

[code language="vb"]    </pre>
<pre style="text-align: left;">    Dim n1, n2, n3, ort As Integer
        n1 = Val(InputBox("1.Sınav Notunu Giriniz:", "Sınav"))
        n2 = Val(InputBox("2.Sınav Notunu Giriniz:", "Sınav"))
        n3 = Val(InputBox("3.Sınav Notunu Giriniz:", "Sınav"))
        ort = (n1 + n2 + n3) / 3
        Select Case ort
            Case ort < 45
                MsgBox("Kaldınız" & ort)
            Case ort > 45
                MsgBox("Geçtiniz" & ort)
        End Select
    End Sub</pre>
<pre style="text-align: left;">[/code]


 
  Projeyi İndir: Öğrenci Not Hesaplama VB.Net