1. Buatlah sebuah Form baru.
2. Buatlah beberapa objek seperti dibawah ini :
NAME
|
CAPTION
|
TOOL
|
Label1 | Angka 1 | Label |
Label2 | Angka 2 | Label |
Label3 | Hasil | Label |
Txt1 |
-
|
Textbox |
Txt2 |
-
|
Textbox |
TxtHasil |
-
|
Textbox |
cmdTambah | TAMBAH | CommandButton |
cmdKurang | KURANG | CommandButton |
cmdKali | KALI | CommandButton |
cmdBagi | BAGI | CommandButton |
3. Listing Programnya adalah :
Private Sub CMDTAMBAH_Click() TXTHASIL.Text = Val(TXT1.Text) + Val(TXT2.Text) End Sub Private Sub CMDKURANG_Click() TXTHASIL.Text = Val(TXT1.Text) – Val(TXT2.Text) End Sub Private Sub CMDKALI_Click() TXTHASIL.Text = Val(TXT1.Text) * Val(TXT2.Text) End Sub Private Sub CMDBAGI_Click() TXTHASIL.Text = Val(TXT1.Text) / Val(TXT2.Text) End Sub
4. Keterangan Listing Programnya :
- VAL disitu digunakan untuk melakukan perhitungan yang fungsi aslinya adalah merubah file yang bertipe STRING (bisa berupa huruf atau angka ) menjadi INTEGER (biasanya angka saja).
- TXTHASIL.Text = Val(TXT1.Text) + Val(TXT2.Text) maksudnya isi dari TXTHASIL adalah isi dari TXT1 ditambah isi dari TXT2.
begitu juga untuk yang pengurangan, pengalian, atau pembagian maksudnya juga seperti itu.
5. Cara memakai programnya :
- Masukan angka pertama terserah anda pada TXT1.
- Masukan angka kedua terserah anda pada TXT2.
- Tekan tombol TAMBAH, KURANG, KALI, atau BAGI untuk melakukan perhitungan TXT1 dan TXT2.
- Hasil dari perhitungan tersebut akan muncul pada TXTHASIL.
Selesai Juga Dech Tutorialnya....
Terimakasih Atas Kunjungannya....
Semoga Ilmu Yang Sedikit Ini Bermanfaat....
Jangan Lupa Like Post Ini Ya.... Terimakasih....
0 komentar:
Posting Komentar