PROGRAM 2.2 BP1

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

Private Sub Commandulang_Click()
Text1 = ""
Text2 = ""
Text3 = ""
End Sub

Private Sub Commandquit_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

 

Komentar

Posting Komentar

Postingan populer dari blog ini

MAHASISWA STMIK PRINGSEWU SAMBANGI SKH KEDAULATAN RAKYAT

-
Gambar
Yogyakarta – Senin (11/9), mahasiswa STMIK Pringsewu mengadakan kunjungan media ke harian Kedaulatan Rakyat. Kunjungan kali ini bertujuan untuk mendapat pengetahuan dari redaksi Kedaulatan Rakyat serta mengetahui proses penerbitan koran di tempat ini dengan jumlah peserta 250 orang meliputi mahasiswa dan dosen pendamping. Kedatangan mahasiswa STMIK Pringsewu disambut oleh Suci dilanjut Agus Suryana selaku perwakilan dosen pendamping. Agenda hari itu dimulai dengan pemberian materi singkat oleh Suci Kedaulatan Rakyat, mengenai sejarah Kedaulatan Rakyat dan proses penerbitan. Kedaulatan Rakyat merupakan salah satu koran tertua di Indonesia. Harian ini berdiri pada tanggal 27 September 1945, artinya Kedaulatan Rakyat sudah seusia dengan negara ini. Pada masa itu, Kedaulatan Rakyat didirikan oleh H. Samawi dan H. Madikin sebagai alat penyambung lidah. Kedaulatan Rakyat merupakan koran lokal Yogyakarta, dan sampai saat ini tidak dijadikan koran nasional. Sebab isi berita dalam...
Baca selengkapnya

PELATIHAN TPA – TOEFL

-
Gambar
STMIK PRINGSEWU – Selasa (25/4), menyelenggarakan pelatihan TPA dan TOEFL untuk dosen STMIK Pringsewu. Pelatihan tersebut diikuti seluruh dosen STMIK Pringsewu, yaitu dari PS. Sistem Informasi, Manajemen Informatika. Kegiatan ini dilaksankan di Kampus STMIK Pringsewu Jl. Wisma Rini No. 09 yang mengambil tempat di Lt. II Aula STMIK Pringsewu. Sebagai narasumber pelatihan tersebut yaitu : 1. Dr. H. Fauzi, S.E., M.Kom., Akt., CA ., 2. Dr. Tulus Suryanto, M.M., CA ., 3. Miswan Gumanti, MBA. Mutu perguruan tinggi, salah satunya ditentukan oleh kualitas dosen pengajar. Untuk mengetahui kualitas dosen, standar penilaiannya adalah kepemilikan sertifikasi dosen (Serdos). Sertifikasi dosen (Serdos) adalah proses pemberian sertifikat pendidik kepada dosen. Program ini merupakan upaya meningkatkan mutu pendidikan nasional, dan memperbaiki kesejahteraan dosen, dengan mendorong dosen untuk secara berkelanjutan meningkatkan profesionalismenya. Sertifikasi dosen tersebut merupakan bagian dalam peni...
Baca selengkapnya

SEMINAR CYBER LAW

-
Gambar
STMIK PRINGSEWU – Sabtu (14/5), Sekolah Tinggi Manajemen Informatika dan Komputer (STMIK) Pringsewu menyelenggarakan kegiatan Seminar Cyber Law. Dalam acara seminar tersebut dihadiri Wakil Ketua I (Elisabet Y.A, M.T.I), Wakil Ketua III (Nur Aminudin, M.T.I), Kaprodi Sistem Informasi (Tri Susilowati, M.T.I), Kaprodi Manajemen Informatika (Oktafianto, M.T.I), bapak/ibu dosen STMIK Pringsewu, mahasiswa mahasiswi, serta tamu undangan, acara tersebut berlangsung di auditorium Lt. II STMIK Pringsewu. Acara seminar tersebut diawali dengan menyanyikan lagu Indonesia Raya, sambutan sekaligus membuka acara seminar Cyber Law oleh Wakil Ketua III (Nur Aminudin, M.T.I), Do’a oleh Sulaiman Adnan, M.M, dan penutup, di lanjutkan acara ini seminar Cyber Law dengan menghadirkan nara sumber Dr. H. Bunyamin Alamsyah, SH., M.Hum. Dalam sambutannya, Nur Aminudin, M.T.I mangatakan, dunia information technology (IT) saat ini berkembang sangat cepat dan masuk dalam lini kehidupan manusia....
Baca selengkapnya