TUGAS BP 2.4

Private Sub Command1_Click()
Text2 = Val(Text1) * 0.15
Text3 = Val(Text1) - Val(Text2)
End Sub
Private Sub Command2_Click()
Text1.SetFocus
Text1= ""
Text2 = ""
Text3 = ""
End Sub
Private Sub Command3_Click()
Unload Me

End Sub

Komentar

Posting Komentar

Postingan populer dari blog ini

TUGAS BP 2.3

Gambar
Private Sub Command1_Click() Text9 = Val(Text1) + Val(Text2) Text10 = Val(Text3) - Val(Text4) Text11 = Val(Text5) * Val(Text6) Text12 = Val(Text7) / Val(Text8) Text13 = Val(Text9) + Val(Text10) + Val(Text11) + Val(Text12) End Sub Private Sub Command2_Click() Text1.SetFocus Text1 = "" Text2 = "" Text3 = "" Text4 = "" Text5 = "" Text6 = "" Text7 = "" Text8 = "" Text9 = "" Text10 = "" Text11 = "" Text12 = "" Text13 = "" End Sub Private Sub Command3_Click() Unload Me End Sub Private Sub Text1_keypress(keyascii As Integer) If keyascii = 13 Then Text2.SetFocus End If End Sub Private Sub Text10_keypress(keyascii As Integer) If keyascii = 13 Then Text10 = Val(Text3) - Val(Text4) End If End Sub Private Sub Text11_keypress(keyascii As Integer) If keyascii = 13 Then Text11 = Val(Text5) * Val...
Baca selengkapnya

TUGAS BP 2.5

Private Sub Command1_Click() Text2 = Val(Text1) * 0.15 Text3 = Val(Text1) - Val(Text2) End Sub Private Sub Command2_Click() Text1.SetFocus Text1 = "" Text2 = "" Text3 = "" End Sub Private Sub Command3_Click() Unload Me End Sub Private Sub Text1_keypress(keyascii As Integer) If keyascii = 13 Then Text2 = Val(Text1) * 0.15 Text3 = Val(Text1) - Val(Text2) End If End Sub
Baca selengkapnya

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

Gambar
STMIK PRINGSEWU  — Setiap kali memperingati hari Sumpah Pemuda, semua stake holder berbondong-bondong menggelar berbagai acara, salah satunya yang dilakukan civitas akademik STMIK Pringsewu dengan menggelar Upacara Hari Sumpah Pemuda ke 89 di halaman kampus setempat, Sabtu (28/10). Nur Aminudin  selaku Inspektur Upacara mengatakan, dihari Sumpah Pemuda yang ke-89 pada tahun 2017 ini, Resimen Mahasiswa dan rekan-rekan dari BEM, Mahasiswa, dan Pimpinan Perguruan Tinggi STMIK Pringsewu beserta Staff dan jajarannya memperingati hari Sumpah Pemuda dengan melaksanakan upacara pengibaran Bendera di halaman kampus setempat. Beliau juga menegaskan bahwa sumpah pemuda merupakan satu tonggak utama dalam sejarah pergerakan kemerdekaan bangsa Indonesia. Kepada mahasiswa mahasiswi STMIK Pringsewu agar mempererat persatuan di tengah perbedaan, jaga nilai-nilai sumpah pemuda, terutama satu bangsa satu tanah air, jangan khianati sumpah pemuda, melalui ...
Baca selengkapnya