Membuat Kalkulator Sederhana dengan Mcrosoft Visual Basic 6.0

 
 Cara membuat kalkulator sederhana dengan Microsoft Visual Basic 6.0 memang sudah banyak tutorialnya. Memang design form nya berbeda-beda, tapi dari codingnya masih tetap sama begitu-begitu juga. Hanya saja jika kita punya imajinasi yang bagus tampilannya bisa kita rubah sesuai keinginan.

    Sebenarnya disini saya juga mau share cara membuat kalkulator yang sangat sederhana dan biasa sekali, tidak ada yang istimewa. Tapi tak apalah tinggal nanti anda bedakan saja dimana letak perbedaannya dari yang lain. Daripada lama-lama kita langsung saja jalankan Microsoft visual basic 6.0 anda masing-masing. Berikut ini design kalkulator yang saya buat..

Sangat sederhana Sekali bukan?  Untuk nama tiap component nya saya biarkan atau tidak diganti. Ok jika sudah selesai membuat design form nya kita lanjut ke listing code. Berikut listing code nya..

Private Sub Command1_Click()

Text3.Text = Val(Text1.Text) + Val(Text2.Text)

End Sub

Private Sub Command2_Click()

Text3.Text = Val(Text1.Text) - Val(Text2.Text)

End Sub

Private Sub Command3_Click()

Text3.Text = Val(Text1.Text) * Val(Text2.Text)

End Sub

Private Sub Command4_Click()

Text3.Text = Val(Text1.Text) / Val(Text2.Text)

End Sub

Private Sub Command5_Click()

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

Text1.SetFocus

End Sub

Private Sub Command6_Click()

Unload Me

End Sub

Private Sub Text1_KEYPRESS(keyascii As Integer)

If Not ((keyascii >= 48) And (keyascii <= 57) Or keyascii = 8) Then

keyascii = 0

End If

End Sub

Private Sub Text2_keypress(keyascii As Integer)

If Not ((keyascii >= 48) And (keyascii <= 57) Or keyascii = 8) Then

keyascii = 0

End If

End Sub

Pada Textbox 1 dan 2 saya batasi hanya bisa input angka saja dan tombol backspace yang dapat berfungsi pada kedua textbox tersebut...
Demikian cara membuat kalkulator sangat biasa dan sederhana sekali ini. semoga bisa menambah referensi dan bisa memotivasi supaya kita bisa lebih kreatif lagi. Berikut saya kasih contoh projek nya silahkan anda download disini.
Selamat Siang...