Contoh Program Visual Studio 2013

Assalamualaikum wr.wb
Pada kesempatan kali ini saya akan membuat contoh program Visual Studio yaitu cara menghitung rata rata nilai akhir mahasiswa

Dibawah ini adalah hasil run dari program tersebut




















Langsung copy codingan di bawah ini :

Public Class Form1

    Private Sub Label3_Click(sender As Object, e As EventArgs) Handles Label3.Click

    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim Nim As String
        Dim Nama As String
        Dim Tugas As Double
        Dim UTS As Double
        Dim UAS As Double
        Dim Huruf As String
        Dim Angka As Double
        Dim Komentar As String
        Nim = Val(TextBox1.Text)
        Nama = TextBox2.Text
        Tugas = Val(TextBox3.Text)
        UTS = Val(TextBox4.Text)
        UAS = Val(TextBox5.Text)
        Angka = (0.2 * Tugas + 0.3 * UTS + 0.5 * UAS)
        TextBox6.Text = Angka

        If Angka <= 56 Then
            Huruf = "E"
            Komentar = "Nilai Anda Sangat kurang,Belajar Lebih Giat Lagi!"
        ElseIf Angka <= 65 Then
            Huruf = "D"
            Komentar = "Nilai Anda Kurang,Pelajari Lagi!"
        ElseIf Angka <= 75 Then
            Huruf = "C"
            Komentar = "Nilai Anda Cukup! Anda Lulus"
        ElseIf Angka <= 85 Then
            Huruf = "B"
            Komentar = "Nilai Anda Baik! Anda Lulus"
        ElseIf Angka > 85 Then
            Huruf = "A"
            Komentar = "Nilai Anda Sempurna! Selamat"
        End If
        TextBox7.Text = Huruf
        TextBox8.Text = Komentar
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox3.Text = ""
        TextBox4.Text = ""
        TextBox5.Text = ""
        TextBox6.Text = ""
        TextBox7.Text = ""
        TextBox8.Text = ""
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        End
    End Sub
End Class

Dan di bawah ini adalah hasil run dari program tersebut

Sekian contoh program yang sudah saya buat semoga bermanfaat