TUGAS 3.5 ( PT. Peluang Petang Setiap Hari )

Private Sub cmdProses_Click() Dim kode As String txtTahun = Left(tx…

TUGAS 3.4 ( Data Buku Stmik Pringsewu Dengan Text)

Private Sub cmdProses_Click() Dim kode As String kode = Left(T…

TUGAS 3.3 ( Penjualan Tiket Kereta Api )

Private Sub cmdproses_Click() Dim kode As String kode = Left(txtk…

TUGAS 3.2 ( Data Buku Stmik Pringsewu )

Private Sub cmdProses_Click() Dim kode As String kode = Mid(Cbokode…

TUGAS 3.1 (Entri Penjualan Laptop Apple)

Private Sub Cbokode_Click() Dim kode As String Dim merk, harga As Stri…

TUGAS 2.5 (Membuat Pilihan Font Color dan Style)

Private Sub Check1_Click() 'Membuat Teks Tebal If Check1.Value = 1…

TUGAS 2.6 (Menampilkan Dan Menentukan Warna dan Style Font pada Label)

Private Sub CmbKetik_Keypress(keyascii As Integer) If keyascii = 13 The…

TUGAS 2.4 (Aplikasi Perhitungan Gaji, Dengan enter Menampilkan Hasil)

Private Sub GP_keypress(keyascii As Integer) If keyascii = 13 Then TJ…

TUGAS 2.3 (Aplikasi Perhitungan Gaji)

Private Sub GP_keypress(keyascii As Integer) If keyascii = 13 Then TJ…

TUGAS 2.2 (Perhitungan Harga Diskon 10%, dengan enter Menampilkan Hasil)

Private Sub ComHitung_Click() diskon = Val(hargaawal) * 0.1 hargaak…