Tugas 2.3 aplikasi perhitungan gajih tampa menggunakan keypress
Private Sub cmdproses_Click()
txtgaji = Val(txtpokok) + Val(txttunjangan) -
Val(txtpotongan)
txtpajak = Val(txtgaji) * 0.05
txtgadit = Val(txtgaji) - Val(txtpajak)
End Sub
Private Sub cmdkeluar_Click()
Unload Me
End Sub
Private Sub cmdulang_Click()
txtpokok = ""
txttunjangan = ""
txtpotongan = ""
txtgaji = ""
txtpajak = ""
txtgadit = ""
txtpokok.SetFocus
End Sub
Komentar
Posting Komentar