Kamis, 12 Maret 2015

aplikasi penghitung nilai mahasiswa menggunakan VB .Net 2008


Cara program penghitung nilai mahasiswa dengan menggunakan VB .Net 2008

Halo apa kabar sobat kali ini saya akan menjelaskan tutorial tentang membuat aplikasi penghitung nilai mahasiswa dengan menggunakan VB .Net 2008, oke tak perlu panjang lebar langsung saja saya mulai tutorialnya.
1.       Pertama buka terlebih dahulu program VB .Net 2008 nya, berikut adalah tampilan awal VB .Net 2008.


2.       Lalu buat project baru, pilih windows form application , berikan nama project yang akan kita buat yaitu “aplikasi penghitung nilai mahasiswa” , lalu pilih ok.



3.       Kemudian buatlah sebuah desain form seperti berikut, terdapat 1 group box, 6 label, 5 textbox, 2 button.



Komponen
Properties
Name
Text
Auto Size
GroupBox 1
Group Box 1
Nilai Akhir Mahasiswa

Label 1
Label 1
Absen

Label 2
Label 2
Tugas

Label 3
Label 3
Keaktifan

Label 4
Label 4
UTS

Label 5
Label 5
UAS

Label 6
lblAkhir

False
Textbox 1
txtAbsen


Textbox 2
txtTugas


Textbox 3
txtAktif


Textbox 4
txtUTS


Textbox 5
txtUAS


Button 1
btnCek
Cek Nilai Akhir

Button 2
btnClose
Close


4.       Kemudian setelah selesai mendesain formnya, berikutnya masukan source code pada button Cek Nilai Akhir , berikut source codenya :

Private Sub btnCek_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCek.Click
        Dim Absen, tugas, aktif, uts, uas As Integer
        Dim akhir As Integer
        Absen = txtAbsen.Text * 20 / 100
        tugas = txtTugas.Text * 15 / 100
        aktif = txtAktif.Text * 10 / 100
        uts = txtUTS.Text * 25 / 100
        uas = txtUAS.Text * 30 / 100
        akhir = Absen + tugas + aktif + uts + uas
        lblAkhir.Text = "nilai akhir kamu " & akhir
        If akhir > 85 Then
            MsgBox("nilai akhir kamu A")
        ElseIf akhir > 70 Then
            MsgBox("nilai akhir kamu B")
        ElseIf akhir > 55 Then
            MsgBox("nilai akhir kamu C")
        ElseIf akhir > 40 Then
            MsgBox("nilai akhir kamu D")
        Else
            MsgBox("nilai akhir kamu E")
        End If
    End Sub
            Masukan juga source code pada buttong Close :
Private Sub btnClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClose.Click
           
                  Close()

            End Sub
            Disini presentase bobot penilaian adalah :
            Absen              = 20%
            Tugas              = 15%
            Keaktifan        = 10%
            UTS                = 25%
            UAS                = 30%
            Berikut ketentuan hasil nilai output dari nilai yang di inputkan :
            Jika nilainya > 85, maka nilai akhirnya adalah “A”
            Jika nilainya >70, maka nilai akhirnya adalah “B”
            Jika nilainya >55, maka nilai akhirnya adalah “C”
            Jika nilanya >40, maka nilai akhirnya adalah “D”
            Jika nilanya <40, maka nilai akhirnya adalah “E”

5.       Setelah semua button di masukan source code, langkah terakhir adalah menjalankan programnya,
Misalkan kita inputkan nilainya sebegai berikut :






Maka hasilnya  sebagai berikut :


 

6.       Demikianlah tutorial program aplikasi penghitung nilai menggunakan VB .Net 2008 semoga bermanfaat, selamat mencoba, jangan malu malu mecoba.

Tidak ada komentar:

Posting Komentar