TUGAS 2 PROGRAM 1 BP1



Private Sub Command1_Click()
Text2 = Val(Text1) * 0.15
Text3 = Val(Text1) - Val(Text2)
End Sub

Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Text3 = ""

End Sub

Private Sub Command3_Click()
Unload Me

End Sub

Komentar

Postingan populer dari blog ini

STMIK PRINGSEWU DAN PEMDA PRINGSEWU MEMBERIKAN PEMBEKALAN KEPADA MAHASISWA KKN

Layar Fleksibel Sudah Dibuat, Kini Lihat Nih Kamera Fleksibel!

YUDISIUM PERIODE I TAHUN 2017