KALKULATOR TANPA KEYPRESS



Private Sub Command1_Click()
If Val(Text1.Text) & Val(Text2.Text) Then
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End If

If Val(Text4.Text) & Val(Text5.Text) Then
Text6.Text = Val(Text4.Text) / Val(Text5.Text)
End If

If Val(Text7.Text) & Val(Text8.Text) Then
Text9.Text = Val(Text7.Text) - Val(Text8.Text)
End If

If Val(Text10.Text) & Val(Text11.Text) Then
Text12.Text = Val(Text10.Text) * Val(Text11.Text)
End If

End Sub

Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
Text10.Text = ""
Text11.Text = ""
Text12.Text = ""
Text1.SetFocus

End Sub

Private Sub Command3_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
Text10.Text = ""
Text11.Text = ""
Text12.Text = ""
Text1.SetFocus

End Sub

Private Sub Command4_Click()
End
End Sub




Komentar

Posting Komentar

Postingan populer dari blog ini

PEMILIHAN MULI MEKHANAI

Gambar
PRINGSEWU  –  STMIK Pringsewu  mengirimkan 8 mahasiswa dalam ajang pemilihan muli mekhanai tahun 2016 yang diselenggarakan oleh Dinas Pendidikan Kebudayaan dan Pariwisata (Disdikbudpar) Pringsewu pada tanggal 16 s/d 19 Maret 2015. 8 Mahasisiwa STMIK Pringsewu yang akan mengikuti ajang pemilihan muli mekhanai tahun 2016 sebagai berikut : Sebanyak 12 pasang finalis berhasil lulus terpilih dalam mengikuti seleksi pemilihan muli mekhanai 2016 yang digelar Dinas Pendidikan, Kebudayaan dan Pariwisata (Disdikbudpar) Kabupaten Pringsewu di Aula Kampus STMIK Pringsewu, Rabu (16/3) kemarin. Dari 12 Pasang finali muli mekhanai 2016,  LING LING SAPUTRI – NPM. 15201048 Mahasiswi   STMIK Pringsewu  semester 2,  mohon do’a dan dukungannya, Insya’Allah berjalan lancar dan sukses untuk mengikuti babak selanjutnya. Amin yra Pemilihan muli mekhanai 2016 yang dibuka langsung oleh Kepala Disdikbudpar Kabupaten Pringsewu, Heri Iswayudi ditandai secara simbolis dengan penyematan nomor peserta dan
Baca selengkapnya

STMIK PRINGSEWU GELAR POSDIKTI 2017 GELOMBANG 1

Gambar
Jum’at, (11/8) merupakan hari bersejarah bagi semua calon mahasiswa baru, karena hari ini merupakan hari dimulainya acara Program Orientasi Studi Pendidikan Tinggi (POSDIKTI) 2017 gelombang 1 untuk STMIK Pringsewu yang ada di Yayasan Pendidikan Startech. Tepat pada pukul 08.00 WIB dimulainya upacara pembukaan POSDIKTI. Calon mahasiswa-mahasiswi  STMIK Pringsewu  mengikuti acara Program Orientasi Studi Pendidikan Tinggi (POSDIKTI) 2017 gelombang 1 di kampus Jalan Wisma Rini No. 09 Pringsewu. Acara Program Orientasi Studi Pendidikan Tinggi (POSDIKTI) 2017 gelombang 1 dibuka oleh Wakil Ketua III Bidang Kemahasiswaan,  Nur Aminudin, M.T.I  mewakili Ketua  STMIK Pringsewu , Hj. Rita Irviani, M.M. alam sambutannya  Nur Aminudin  mengatakan, POSDIKTI STMIK Pringsewu merupakan kelengkapan non-struktural pada kampus, posdikti berfungsi sebagai orientasi bagi mahasiswa baru untuk memasuki dunia perguruan tinggi yang berbeda dengan belajar di sekolah lanjutan, Mahasiswa baru dapat berkomu
Baca selengkapnya

STMIK PRINGSEWU GELAR PRA PENDIDIKAN DASAR MILITER (PRADIKSARMIL)

Gambar
STMIK PRINGSEWU  – Jum’at, 30 Oktober 2015, Ketua Yayasan Lembaga Pendidikan Startech Pringsewu Lampung, H. Fauzi, S.E., M.Kom., Akt., CA., membuka Pra Pendidikan Dasar Militer (Pradiksarmil) Resimen Mahasiswa (Menwa) Batalyon 208 Pringsewu angkatan XXXVI di halaman kampus Sekolah Tinggi Manajemen Informatika dan Komputer (STMIK) Pringsewu. Dalam laporannya, Komandan Satuan Pendidikan Safrizal Ramadhan mengatakan, dasar pelaksanaan pembentukan Resimen Mahasiswa ini, Surat Keputusan Bersama (SKB) Empat Menteri. Empat kementerian yang mengeluarkan SKB itu, yakni Menteri Pertahanan, Menteri Dalam Negeri, Menteri Riset Teknologi dan Dikti, Menteri Pemuda dan Olah Raga nomor : KB/11/XII/2014, 421.73/6660A/SJ, 6/M/MoU/XII/2014, 1175 Tahun 2014 tanggal 19 Desember 2014 tentang Pembinaan dan Pemberdayaan Resimen Mahasiswa Indonesia dalam Bela Negara. Pra Pendidikan Dasar Militer (Pradiksarmil) Resimen Mahasiswa (Menwa) Batalyon 208 Pringsewu angkatan XXXVI ini akan berlangsung selama 3
Baca selengkapnya