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; 

  

    </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;">
 
  Projeyi İndir: Öğrenci Not Hesaplama VB.Net  
 
   

 

Rica: Sitemizin Google'da Ön Sıralarda Çıkması İçin Lütfen Alttaki Google+ Butonuna Tıklayınız , Sayfamızı Facebookta Beğeniniz veya yazıları Twitter,Facebookta paylaşınız.