Tugas 1.1 bahasa pemrograman-1

-


Private Sub Hitung_Click()
Diskon = Val(HargaAwal) * 0.1
HargaAkhir = Val(HargaAwal) - Val(Diskon)
End Sub

Private Sub Ulangi_Click()
HargaAwal.SetFocus
HargaAwal = ""
Diskon = ""
HargaAkhir = ""
End Sub

Private Sub Quit_Click()
End
End Sub


Komentar

Posting Komentar

Postingan populer dari blog ini

tugas 2.3 bahasa pemrograman-1

-
Gambar
Private Sub GajiPokok_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Tunjangan.SetFocus End If End Sub Private Sub Tunjangan_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Potongan.SetFocus End If End Sub Private Sub Proses_Click() GajiKotor = Val(GajiPokok) + Val(Tunjangan) - Val(Potongan) Pajak = Val(GajiKotor) * 0.1 GajiBersih = Val(GajiKotor) - Val(Pajak) End Sub Private Sub Ulang_Click() GajiPokok.SetFocus GajiPokok = "" Tunjangan = "" Potongan = "" GajiKotor = "" Pajak = "" GajiBersih = "" End Sub Private Sub Keluar_Click() End End Sub
Baca selengkapnya

tugas 2.2 bahasa pemrograman-1

-
Gambar
Private Sub HargaAwal_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then HargaAwal.SetFocus Diskon = Val(HargaAwal) * 0.1 HargaAkhir = Val(HargaAwal) - Val(Diskon) End If End Sub Private Sub Hitung_Click() Diskon = Val(HargaAwal) * 0.1 HargaAkhir = Val(HargaAwal) - Val(Diskon) End Sub Private Sub Ulangi_Click() HargaAwal.SetFocus HargaAwal = "" Diskon = "" HargaAkhir = "" End Sub Private Sub Keluar_Click() End End Sub
Baca selengkapnya

Seminar " pengolahan data statistik menggunakan program SPSS"

-
Gambar
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”, imbuhnya. Seminar yang diikuti oleh 160 mahasiswa STMIK Pringsewu mendapat antusiasme dari peserta. Materi terbagi menjadi dua, materi ...
Baca selengkapnya