0 pembuatan program gaji

Pertama buat isian seperti di bawah ini dengan “ label , textbox dan button”

Klik 2x pada button proses, kemudian tambahkan “

     Dim nm_mhs As String

        Dim gaji, jam, total As Integer

        nm_mhs = TextBox1.Text

        gaji = TextBox2.Text

        jam = TextBox3.Text

        total = gaji * jam

        MsgBox("Selamat Datang " & nm_mhs & " Di Kantor ")

        MsgBox("Gaji Anda : " & total)

        Dim golongan As String

        Dim jumlah, tunjangan, tunjang As Integer

        golongan = TextBox4.Text

        jumlah = TextBox5.Text

        tunjangan = TextBox6.Text

        tunjang = jumlah * tunjangan

        MsgBox("Golongan" & golongan & ".")

        MsgBox("Tunjangan : " & tunjang)”

Antara Private sub  ----  End sub.

Kemudian coba debug / f5

Jika sudah selesai dan keluar tampilan seperti di atas berarti berhasil.....

Sekian terima kasih.....