Dalam kehidupan sehari-hari tentu tidak asing lagi bagi kita dalam melakukan suatu perhitungan matematika yang biasa kita lakukan, oleh karena itu dalam pembahasan kali ini kita akan membuat kalkulator sederhana. Untuk lebih jelasnya mari kita ikuti langkah langkah berikut ini :
Langkah 1 : buat dulu form seperti gambar dibawah dengan 3 buah label , 2 TextBox, 4 OptionButton, 2 frame, dan 2 CommandButton.
Langkah 2 : oh iya , sebelum mengkoding tombol-tombol yang kita buat ada baiknya ganti dulu Name dan caption serta text dari masing-masing tombol agar lebih mudah dalam melakukan pengkodingan.
- Ganti Name TextBox1 menjadi txt_inp1 dan Text-nya kosongi saja
- Ganti Name TexBoxt2 menjadi txt_inp2 dan Text-nya kosongi juga
- Ganti Name OptionButton1 menjadi op_tambah dan ganti caption dengan symbol +
- Ganti Name OptionButton2 menjadi op_kurang dan ganti caption dengan symbol –
- Ganti Name OptionButton3 menjadi op_kali dan ganti caption dengan symbol x
- Ganti Name OptionButton4 menjadi op_bagi dan ganti caption dengan symbol /
- Ganti Name CommandButton1 menjadi cmd_hapus dan ganti caption menjadi Hapus
- Ganti Name CommandButton2 menjadi cmd_close dan ganti caption menjadi Close
- Ganti Name Label1 menjadi lb_inpt1 dan ganti caption menjadi Input1
- Ganti Name Label2 menjadi lb_inpt2 dan ganti caption menjadi Input2
- Ganti Name Label3 menjadi lb_hasil dan caption-nya kosongi saja
Langkah 3 : masukkan kode-kode program pada masing-masing tombol yang aka kita beri perintah, yaitu dengan mengklik dua kali pada tombol yang akan kita beri perintah kemudian tuliskan kode-kode tersebut diantara public sub _() dan end sub.
- Tombol + : lb_hasil.Caption = Val(txt_inp1) + Val(txt_inp2)
- Tombol – : lb_hasil.Caption = Val(txt_inp1) – Val(txt_inp2)
- Tombol x : lb_hasil.Caption = Val(txt_inp1) * Val(txt_inp2)
- Tombol / : lb_hasil.Caption = Val(txt_inp1) / Val(txt_inp2)
- Tombol Hapus :
txt_inp1.Text = “”
txt_inp2.Text = “”
lb_hasil.Caption = “” - Tombol Close : end
Langkah terakhir adalah test menguji program :Nah , kalkulator sederhana yang kita buat sudah rampung dan siap digunakan…..
mudah kan……. klik Disini untuk download file pdf nya.
wah ,Alhamdulillah saya bisa belajar vb sekarang….
hehehe
gimana dengan cmd hasilnya kok gak di tulis rumusnya
rumus perhitungan saya tulis di OptionButton…..
Terima Kasih banyak , sangat membantu. 😀