Aplikasi Penilaian With VB 2012

Pertama Design Dulu Tampilan Form Nya Seperti Gambar Di Bawah Ini :D

Di Design Nya Terdapat :

7 Label 

7 Text Box (txtNis, txtNama, txtTugas, txtHarian, txtSemester, txtAkhir, txtHuruf)

Dan 1 Buah Button (btnSubmit)

*Jika Gambarnya Kurang Jelas Silahkan Klik 2X pada Gambarnya :)

Apabila Sudah Di Design Klik 2 Kali Di Button Submit Nya Atau Bisa Klik Kanan -> View Code

Lalu Ketikkan Code Nya Sebagai Berikut :

Public Class Form1

    Private Sub btnSubmit_Click(sender As Object, e As EventArgs) Handles btnSubmit.Click

        txtAkhir.Text = (50 / 100 * txtTugas.Text) + (20 / 100 * txtHarian.Text) + (30 / 100 * txtSemester.Text)

        If txtAkhir.Text > 85 Then

            txtHuruf.Text = "A"

        ElseIf txtAkhir.Text > 75 Then

            txtHuruf.Text = "B"

        ElseIf txtAkhir.Text > 60 Then

            txtHuruf.Text = "C"

        ElseIf txtAkhir.Text < 60 Then

            txtHuruf.Text = "a"

        End If

    End Sub

End Class

Nah Kalau Sudah Di Ketikk ( Jangan Copy Paste Ya :p ) Silahkan Running Tekan F5 , Maka Akan Terlihat Seperti Tampilan Berikut :

Apabila Masih Ada Yang Kebingungan Silahkan Berkomentar Ya Kawan :) :D