0


Cara :
  • Buka Ms. Access anda
  • Klik tab Create, pilih Form Design
 maka akan muncul seperti ini : 
  • Setelah itu, di tab Design, klik Text Box
  • buat 3 buah dengan ukuran sesuai keinginan
  • klik kotak yang bertuliskan Text0 (atau Text1, dst) yang terletak di kotak yang kiri pada textbox tersebut
  • klik property sheet pada tab Design
  • pada kotak property sheet, cari kata "Caption". setelah ketemu, ganti kata-kata yang ada di kotak caption tersebut menjadi "Nominal 1" atau sesuai keinginaan. dan di kotak yang lainnya, ganti namanya dengan Nominal 2 dan Hasil
Screen Shot :
  • klik kotak unbound di sebelah kotak Nominal 1, di kotak property sheet, ganti Namenya menjadi TxtNominal1 (jangan di spasi, karena program tidak akan dapat berjalan jika nama dari unbound tersebut terdapat spasi) 
  • lakukan kembali cara di atas untuk kotak Nominal 2 (TxtNominal2) dan Hasil (TxtHasil)




  •  setelah membuat text box, kita akan membuat button atau tombol perintah. di tab design, klik button, dan buat button tersebut sebanyak 4 buah
  • namai captionnya pada property sheet yang masing-masing : - , + , X, /  dan namai namenya(terletak di atas kotak caption) dengan : CmdKurang( - ), CmdTambah( + ), CmdKali( X ), CmdBagi( / )
  • setelah itu kita akan masuk ke perumusan VBA






Buka VBA anda ( cara membuka VBA terletak di sebelah kanan atas tombol Property Sheet, lihat gambar ) 
Gambar :







Copy-Paste kata-kata di bawah ini : 
pada kotak General , pilih :
1. CmdTambah
TxtHasil = TxtNominal1 + TxtNominal2 
2. CmdKurang
 TxtHasil = TxtNominal1 - TxtNominal2 
3. CmdKali
 TxtHasil = TxtNominal1 * TxtNominal2
4. CmdBagi
 TxtHasil = TxtNominal1 / TxtNominal2 

Maka Hasilnya akan seperti ini :











Posting Komentar Blogger

Terimakasih telah Berkunjung ke Tugas'Blog. Semoga bermanfaat
Peraturan Berkomentar:
- Dilarang menggunakan bahasa Kasar
- Dilarang melakukan spamming
- Dilarang menyinggung orang lain

Selamat berkomentar :)

 
Top