tugas 2.3 aplikasi perhitungan gaji tanpa keypress
Private Sub cmdkeluar_Click() End End Sub Private Sub Cmdproses_Click() txtgk = Val(txtgp) + Val(txttj) - Val(txtpt) txtpj = Val(txtgk) * 0.1 txtgd = Val(txtgk) - Val(txtpj) End Sub Private Sub cmdulang_Click() txtgp = "" txttj = "" txtpt = "" txtgk = "" txtpj = "" txtgd = "" End Sub