Cara Membuat Kalkulator IPK di Visual Basic 2008

Cara Membuat Kalkulator IPK di Visual Basic 2008

Visual Basic adalah bahasa pengembangan aplikasi yang dibuat oleh Microsoft. Bahasa ini sering dipakai untuk membuat perangkat lunak desktop, termasuk aplikasi yang menghitung persamaan matematika. Di sini, kita akan membuat kalkulator IPK yang memungkinkan pengguna memasukkan nilai dan menyimpannya di database aplikasi, lalu menghitung rata-ratanya.

Langkah 1

Mulailah dengan membuka Visual Studio 2008 dan buat dokumen VB baru. Di sinilah Anda akan menulis kode aplikasi kalkulator IPK.

Langkah 2

Tambahkan sebuah form baru yang akan menerima masukan nilai dan nama mata kuliah.

Public Class Form
    Dim Credits As Double
    Dim GPA As Double

Langkah 3

Buat subrutin untuk merekam masukan nilai dan nama mata kuliah.

Private Sub btnRecord_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRecord.Click
    ' Logika perekaman nilai akan ditulis di sini

Langkah 4

Definisikan rumus yang menghitung IPK dengan menambahkan kode berikut.

GPA += Grade()
Grade = Credits += CDbl(Credits.Text)

Langkah 5

Tentukan nilai numerik untuk setiap pilihan nilai dan tetapkan ke variabel.

If Grade.Text = "A" Then
    GPA += 4
ElseIf Grade.Text = "B" Then
    GPA += 3
ElseIf Grade.Text = "C" Then
    GPA += 2
ElseIf Grade.Text = "D" Then
    GPA += 1
End If

Langkah 6

Selanjutnya, buat subrutin yang menyimpan hasil kalkulasi dan menampilkan IPK akhir.

End Sub

Private Sub btnCalculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCalculate.Click
    Dim averageGPA As Double = GPA / Credits
    textGPA.Text = CStr(averageGPA)
End Sub

End Class

Simak kode VB Anda, kompilasi dengan compiler pilihan Anda, dan jalankan aplikasi desktop tersebut. Selamat mencoba!