Membuat Kalkulator Sederhana VB 6.0

Kali ini kita akan membuat kalkulator sederhana dengan Visual Basic 6.0, baiklah daripada kelamaan lebih baik langsung saja.

1. Masuk ke program VB 6.0

2. Pilih Standart Exe lalu Open

3. Kemudian buat seperti pada gambar dibawah iniUntitled3
yaitu dengan tool Label 3 buah, Textbox 3 buah, CommandButton 5 buah. Untuk rangkaian tool-toolnya sesuai selera anda.

4. Ubah kata-kata tersebut, dan hapus kata yang ada dalam TextBox hingga hasilnya seperti iniUntitled3

5. Klik 2x pada CommandButton (+), lalu ketik kodingannya

Private Sub Command1_Click()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub

6. Klik 2x pada CommandButton (-), lalu ketik kodingannya

Private Sub Command2_Click()
Text3.Text = Val(Text1.Text) – Val(Text2.Text)
End Sub

7. Klik 2x pada CommandButton (/), lalu ketik kodingannya

Private Sub Command3_Click()
Text3.Text = Val(Text1.Text) / Val(Text2.Text)
End Sub

8. Klik 2x pada CommandButton (*), lalu ketik kodingannya

Private Sub Command4_Click()
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
End Sub

9. Klik 2x pada CommandButton (Clear), lalu ketik kodingannya

Private Sub Command5_Click()
Text1.Text = Clear
Text2.Text = Clear
Text3.Text = Clear
End Sub

Hingga pada form penulisan coding seperti ini

Untitled3
Jika sudah tekan F5 untuk me-running program, masukkan angka yang ingin dihitung terlebih dahulu.

Untitled3

Kalkulator Sederhana

Kalkulator sederhana pun telah selesai dibuat😀

Sumber

About alfianeffendi

Someone who want to try be successful!! Lihat semua pos milik alfianeffendi

2 responses to “Membuat Kalkulator Sederhana VB 6.0

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s

%d blogger menyukai ini: