Program Sederhana Menghitung Gaji Karyawan Dengan Menggunakan Visual Basic 6.0

Listing codenya :
Private Sub Combo1_Click()
If Combo1.Text = "NIKAH" Then
Text5.Text = 0.1 * Val(Text4.Text)
Else
Text5.Text = o
End If
End Sub

Private Sub Command1_Click() //tombol hitung
Text6.Text = Val(Text3.Text) + Val(Text5.Text) + Val(Text4.Text)
End Sub

Private Sub Command2_Click()// tombol ulangi
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
End Sub

Private Sub Command3_Click()// tombol keluar
End
End Sub
Private Sub Form_Load()
Combo1.AddItem "NIKAH"
Combo1.AddItem "Belum NIKAH"
Combo1.ListIndex = 0
End Sub

Private Sub Text2_Change()
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
End Sub


Outputnya: 
 











Selamat Mencoba..
Source: http://avrilblue.blogspot.com/2011/12/program-sederhana-menghitung-gaji.html
Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari Visual Basic 6.0 Program di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.