Program 3 Aplikasi Perhitungan Gajih Manual



Private Sub Cmd1_click()
Txt4 = Val(Txt1) + Val(Txt2) - Val(Txt3)
Txt5 = Val(Txt4) * 0.1
Txt6 = Val(Txt4) - Val(Txt5)
End Sub

Private Sub Cmd2_Click()
Txt1 = ""
Txt2 = ""
Txt3 = ""
Txt4 = ""
Txt5 = ""
Txt6 = ""
End Sub

Private Sub Cmd3_Click()
Unload Me
End Sub

Komentar

Postingan populer dari blog ini

Tutorial

Teknologi Yang Akan Menjadi Tren Di Tahun 2017

STMIK PRINGSEWU GELAR UPACARA HARI SUMPAH PEMUDA YANG KE 89 BERSAMA MENWA, BEM SERTA MAHASISWA