Langsung ke konten utama

TUGAS MK BP1 TUGAS 1.3

Private Sub Txtn1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Txtn2.SetFocus
End If

End Sub
Private Sub Txtn2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Txthasil = Val(txtn1) * Val(Txtn2)
End If
End Sub

Private Sub Cmdhitung_Click()
Txthasil = Val(txtn1) * Val(Txtn2)
End Sub

Private Sub Cmdbersih_Click()
txtn1.SetFocus
txtn1 = ""
Txtn2 = ""
Txthasil = ""
End Sub

Private Sub cmdhasil_Click()
End
End Sub




Label:

Komentar

Posting Komentar

Postingan populer dari blog ini

MAHASISWA STMIK PRINGSEWU GELAR BAZAR

STMIK PRINGSEWU  – Sabtu (31/3), Mahasiswa Sekolah Tinggi Manajemen Informatika dan Komputer (STMIK) Pringsewu menggelar bazar kewirausahaan di Pendopo Pringsewu yang beralamat di Jalan Jenderal Sudirman, Pringsewu Barat, Pringsewu, Kabupaten Pringsewu. Bazar kewirausahaan tersebut dibuka Dedi Irawan selaku dosen pengampu mata kuliah Kewirausahaan, beliau mengatakan, kami selaku dosen sangat mengapresiasi kegiatan positif ini. Bazar ini tujuannya adalah untuk membina silahturahmi dalam suasana yang berbeda dan menumbuhkan semangat kewirausahaan. Konsep kewirausahaan juga merupakan program Pemerintah yang sedang dilaksanakan saat ini. Bagaimana menumbuhkan kewirausahaan itu disemua lini termasuk mahasiswa. Karena mahasiswa nanti orientasinya setelah lulus tidak hanya mencari pekerjaan tapi mereka bisa menciptakan lapangan pekerjaan sendiri, selain itu kegiatan tersebut merupakan rangkain kegiatan yang dilakukan dalam rangka HUT Kabupaten Pringsewu ke-9, ucapnya. Sementa...
Posting Komentar
Baca selengkapnya

SEMINAR PENERAPAN ILMU PENGETAHUAN DAN TEKNOLOGI DALAM BIDANG PENDIDIKAN DAN PENELITIAN

STMIK PRINGSEWU  – Rabu (14/3), Sekolah Tinggi Manajemen Informatika dan Komputer (STMIK) Pringsewu menyelenggarakan SEMINAR “Seminar Penerapan Ilmu Pengetahuan dan Teknologi dalam Bidang Pendidikan dan Penelitian” yang dihadiri bapak/ibu dosen STMIK Pringsewu dan mahasiswa/i STMIK Pringsewu. Sebagai narasumber STMIK Pringsewu mendatangkan  Dr. Ribhan, S.E., M.Si.  Seminar tersebut merupakan rangkaian kegiatan yang diselenggarakan STMIK Pringsewu dalam rangka HUT Kabupaten Pringsewu ke-9. Seminar Penerapan Ilmu Pengetahuan dan Teknologi dalam Bidang Pendidikan dan Penelitian tersebut dibuka oleh Elisabet Yunaeti A, M.T.I Wakil Ketua I mewakili Ketua STMIK Pringsewu Hj. Rita Irviani, M.M didampingi Bapak/Ibu Dosen dan jajaran Badan Eksekutif Mahasiswa STMIK Pringsewu. Elisabet Yunaeti A, M.T.I Wakil Ketua I mewakili Ketua STMIK Pringsewu Hj. Rita Irviani, M.M dalam pembukaan seminar tersebut mengatakan, seminar ini dimaksudkan untuk berbagi hasil serta berdisku...
Posting Komentar
Baca selengkapnya

SEMINAR PENGOLAHAN DATA STATISTIK MENGGUNAKAN PROGRAM SPSS

Pringsewu, Senin (19/3).- STMIK Pringsewu kembali mengadakan seminar, kali ini bertajuk “Pengolahan Data Statistik Menggunakan Program SPSS”. Seminar ini merupakan yang terakhir dari rangkaian seminar dalam rangka peringatan HUT Kabupaten Pringsewu yang kesembilan. Seminar ini menghadirkan narasumber dosen STMIK Pringsewu, Budi Usmanto, S.Si., M.TI. dan Bernadhita Herindri Samodera Utami, S.Si., M.Sc. Seminar dimulai pada pukul 09.00 WIB yang dibuka secara resmi oleh Nur Aminudin, M.T.I selaku Wakil Ketua III STMIK Pringsewu mewakili Ketua STMIK Pringsewu Hj. Rita Irviani, M.M. Dalam sambutannya, Nur demikian disapa menyampaikan bahwa statistika dibutuhkan dalam pengambilan kebijakan bagi pihak-pihak berkepentingan. “Dengan demikian statistika sebagai ilmu penting untuk dipelajari dan diharapkan seminar ini menambah pengetahuan bagi mahasiswa-mahasiswi STMIK Pringsewu”,  Seminar yang diikuti oleh 160 mahasiswa STMIK Pringsewu mendapat antusiasme dari peserta. Materi terbagi me...
Posting Komentar
Baca selengkapnya