Tampilkan postingan dengan label Latihan. Tampilkan semua postingan
Tampilkan postingan dengan label Latihan. Tampilkan semua postingan

Latihan Persiapan UAS

Author: MuTiaRaWaTy BloG Posted under:
Untuk semua mahasiswa/i harap pelajari semua materi yang sudah diberikan. Untuk persiapan UAS silahkan kalian coba latihan dibawah ini, mudah-mudahan akan berguna untuk persiapan UAS kalian.

SELAMAT MENEMPUH UJIAN UAS
0 Comments

Tugas 1

Author: MuTiaRaWaTy BloG Posted under:
  TUGAS VB INDIVIDU
Lihat Penuh >> >                                                                <<< Kembali
Design Form 
  Ketentuan Program :
  1. Buat Prosedur Aktif, Tidak aktif dan Bersih, kemudian panggil setiap prosedur tersebut didalam form kalian sesuai dengan logika kalian masing-masing.
  2. NIP 200803171 Purna Indra Sari, 2009771 Dwiyanto Edi, 2009668 Selvi Kurniawati, selain itu jika dimasukkan nip yang lain akan keluar "NIP Tidak diKenal" pada textbox nama karyawan. 
  3. Kode DR untuk Direktur, MG  untuk Manajer, ST untuk Staff
  4. Direktur Gapok = Rp. 3.000.000 Tunj. Jabatan 5% * Gapok, Tunj. Istri 5%* Gapok, Manajer Gapok = Rp. 2.250.000,- Tunj. Jabatan 5%* Gapok, Tunj. Istri 3%* Gapok, Staff Gapok = Rp. 1.850.00, Tunj. jabatan Tidak ada dan Tunj. Istri  2%* Gapok.
  5. Input Jumlah Anak
  6. Tunj. Anak : Jika anak <=3 maka Jumlah anak * Rp. 150.000, Namun jika jumlah anak >= 3 maka tunjangan anak = 3 * Rp. 150.000,-
  7. Proses = Gapok + Tunj. Jabatan + Tunj. Istri + Tunj. Anak

0 Comments

Latihan 1

Author: MuTiaRaWaTy BloG Posted under:

Private Sub cmdBersih_Click()
Me.txtharga.Text = ""
Me.txtjumbel.Text = ""
Me.txtkode.Text = ""
Me.txtnama.Text = ""
Me.txttotbay.Text = ""
Me.txtkode.SetFocus
End Sub

Private Sub cmdhitung_Click()
'Untuk mencari Total Bayar
Me.txttotbay.Text = Val(Me.txtharga.Text) * (Me.txtjumbel.Text)
End Sub

Private Sub cmdkeluar_Click()
End
End Sub

Private Sub Form_Load()
'Membuat Textbox tidak aktif
Me.txttotbay.Enabled = False
End Sub


                                                                                                           MTW & Edi
0 Comments