Program Menghitung Gaji Karyawan Visual Basic

Pada tutorial kali ini kita akan membuat sebuah program Menghitung Gaji dengan Visual Basic, Kita akan menghitung gaji karyawan bagian kantor berdasarkan level pekerjaan (Manajer, HRD, Staf, Sekertaris dan Reseptionist, perhitungan gaji di sini meliputi bonus 10% dari gaji pokok bagi karyawan yang selalu masuk, dan bonus lemburan, bagi karyawan yang berkerja melebihi waktu normal, baiklah ayo kita mulai tutorialnya :

1. Pertama jalankan VB dengan project Standar EXE
2. Lalu tambahkan 4 label, 4 text box, 1 combo box an 1 command button, aturlah sehingga seperti ini :
3. ubahlah propertiesnya, dengan kriteria seperti ini :
Tool BoxPropertiesKeterangan
Label 1CaptionNama
Label 2Jabatan
Label 3Absen
Label 4Lembur
Command 1Lihat Gaji
Combo 1Captionkosong
Text 1
Text 2
Text 3
Text 4
AligmentCenter
AllFont Size12
Sehingga seperti ini :

4. Lalu tuilskan scrip berikut :

Private Sub Form_Load()
Combo1.AddItem "Manager" 'Script untuk menambahkan variabel ke combo box
Combo1.AddItem "Sekertaris" 'Sehingga combo box akan seperti sebuah list
Combo1.AddItem "HRD" 'Lihat Gambar List Combo Box (Bawah)
Combo1.AddItem "Staf"
Combo1.AddItem "Reseptionist"
End Sub
List Combo Box
Private Sub Command1_Click()
If Combo1 = "Manager" Then 'Jika combo box berisi variabel Manager maka
gaji = 6000000 'Gaji Manager adalah 6 Juta
ElseIf Combo1 = "Sekertaris" Then
gaji = 5000000
ElseIf Combo1 = "HRD" Then
gaji = 5000000
ElseIf Combo1 = "Staf" Then
gaji = 4000000
ElseIf Combo1 = "Reseptionist" Then
gaji = 3500000
End If

If Text2 = "" Or Text2 = "0" Then 'Jika Text2 (Absen) tidak ada maka
bonus = gaji * 0.1 'Karyawan mendapatkan bonus berupa 0,1 (10%) dari gaji
Else 'Tapi jika karyawan membolos / Absen, walau satu hari dengan alasan apapun maka
bonus = 0 'Bonus = 0, yang berarti, karyawan tersebut tidak mendapatkan bonus
End If

lembur = Text3 * 25000 'Jika karyawan kerja lembur, maka Jumlah Jam lembur x 25 Ribu
total = gaji + bonus + lembur 'Total gaji yang di dapatkan 
Text4 = total 'Nilai dari total sama dengan text4
End Sub
Catatn :
Untuk Gaji, Bonus, Lembur dan total dari script diatas, itu adalah sebuah tools di VB untuk menyimpan data di memory, tapi hanya sementara, dan bisa di ubah oleh anda dengan kata yang lebih mudah untuk anda pahami
5. Dan sekarang coba jalankan programnya,

Itualah program untuk Menghitung gaji karyawan,
Sekian dan terimakasih


Bantu kembangkan Blues Pedia yuk, caranya share artikel ini :

G+

0 Response to "Program Menghitung Gaji Karyawan Visual Basic"

Post a Comment