Archive for August, 2009

17
Aug
09

Kalkulator sederhana dengan Visual Basic 6.0

Sebelumnya saya sudah pernah memberikan source code membuat kalkulator dengan pascal nah sekarang dengan visual basic 6.0 berikut carannya

1. new project > standar exe

2. di form yang telah disediakan buat 3 buah text box dan 5 command button ( boleh dimodif sendiri )

kira-kira berikut contoh tampialnnya :

IC4L-Kalkulator

tadi kita sudah membuat 3 textbox dan 6 command button berikut properties yang harus diganti :
TEXT1 name : value1
text   : kosongkan
————————————————
TEXT2 name value2
text   kosongkan
————————————————
TEXT3 name hasil
text kosongkan
————————————————
command button1 caption :     +
name     : tambah
————————————————
command button2 caption :       -
name     : kurang
————————————————
command button3 caption :      x
name      : kali
————————————————
command button4 caption :      :
name     : bagi
————————————————
command button5 caption :       ^
name     : pangkat
————————————————
command button6 caption :     mod
name     : sisabagi
————————————————

Source Code :

Private Sub bagi_Click()
hasil = Val(value1) / Val(value2)
End Sub
Private Sub kali_Click()
hasil = Val(value1) * Val(value2)
End Sub
Private Sub kurang_Click()
hasil = Val(value1) – Val(value2)
End Sub
Private Sub pangkat_Click()
hasil = Val(value1) ^ Val(value2)
End Sub
Private Sub sisabagi_Click()
hasil = Val(value1) Mod Val(value2)
End Sub
Private Sub tambah_Click()
hasil = Val(value1) + Val(value2)
End Sub




 

August 2009
M T W T F S S
« Jul   Sep »
 12
3456789
10111213141516
17181920212223
24252627282930
31  

Archives

Kategori

Supported by

Free Domain

Portofolio

Teknopreneur

My Community