Cara Membuat Kalkulator Sederhana Dengan VB 6.0

Pada Belajar VB 6.0 kali ini akan dibahas mengenai cara membuat Kalkulator sederhana dengan Visual Basic 6.0. Fungsi dari membuat Kalkulator kali ini adalah agar anda mengenali Aritmatika dalam Visual Basic 6.0 dan anda juga bisa membuat Validasi pada Form Kalkulator tersebut.

Berikut langkahnya :
Buka Aplikasi VB 6.0 pada komputer anda
Buatlah Design Form seperti gambar dibawah ini :

Jika sudah membuat Form Kalkulator diatas, logikanya seperti ini :
Jika aplikasi anda Run, maka masukan Angka 1 dan Angka 2, kemudian jika anda ingin melihat hasil Penambahan maka Klik Tombol Tambah, Jika pengurangan Klik Tombol Kurang, Jika akan mengalikan Klik tombol Kali, Jika anda ngin membagi Klik Tombol Bagi.

Silahkan masukan koding dibawah ini pada Form Kalkulator

Private Sub Form_Load()
Text1 = ""
Text2 = ""
Text3 = ""
Text3.Enabled = False
End Sub

Private Sub Command1_Click()
'Ini untuk coding tambah
If Text1 = "" Or Text2 = "" Then
MsgBox "Data Belum Lengkap"
Text1.SetFocus
Else
Text3 = Val(Text1) + Val(Text2)
End If
End Sub

Private Sub Command2_Click()
If Text1 = "" Or Text2 = "" Then
MsgBox "Data Belum Lengkap"
Text1.SetFocus
Else
Text3 = Text1 - Text2
End If
End Sub

Private Sub Command3_Click()
If Text1 = "" Or Text2 = "" Then
MsgBox "Data Belum Lengkap"
Text1.SetFocus
Else
Text3 = Text1 * Text2
End If
End Sub

Private Sub Command4_Click()
If Text1 = "" Or Text2 = "" Then
MsgBox "Data Belum Lengkap"
Text1.SetFocus
Else
Text3 = Text1 / Text2
End If
End Sub

Jika anda sudah memasukan koding diatas, silahkan anda Run atau Jalankan Project Vb 6.0 anda