Untuk kalian yang suka
dengan VisualBasic nih saya saya kasihkan koding untuk membuat Kalkulator
sederhana buat kalian semua,
-Pertama-tama jalankan
program VisualBasic nya,kemudian pilih yang VB enterprise edition controls
terus buka form nya..kemudian :
*masukan 3 label dengan
caption:Bilangan1,Bilangan2,Hasil.
*masukan 3 text,
*masukan 6 commandbutton
dengan caption:Reset,Exit,+,-,*,dan /
*tambahkan 1 frame dengan caption:Tombol
*selanjutnya masukan
commandbutton tersebut kedalam Frame agar kelihatan lebih menarik.
>>Dan terakhir masuk
ke kode dan masukan koding-koding dibawah ini,
Dan jalankan dehh(RUN),,
Selamat mencobaa yaaaa………
Private Sub
bersih()
Text1
= ""
Text2
= ""
Text3
= ""
End
Sub
Private Sub
nonaktif()
Text1.Enabled
= False
Text2.Enabled
= False
Text3.Enabled
= False
End
Sub
Private Sub
aktif()
Text1.Enabled
= True
Text2.Enabled
= True
Text3.Enabled
= True
End
Sub
Private Sub
Command1_Click()
aktif
bersih
Text1.SetFocus
End
Sub
Private Sub
Command2_Click()
Unload
Me
End
Sub
Private
Sub Command3_Click()
Text3
= Val(Text1) + Val(Text2)
nonaktif
End
Sub
Private Sub
Command4_Click()
Text3
= Val(Text1) - Val(Text2)
nonaktif
End
Sub
Private Sub
Command5_Click()
Text3
= Val(Text1) * Val(Text2)
nonaktif
End
Sub
Private
Sub Command6_Click()
Text3
= Val(Text1) / Val(Text2)
nonaktif
End
Sub
Private Sub
Form_Activate()
nonaktif
bersih
End
Sub
Private Sub
Text3_Click()
Text3
= Val(Text1) + Val(Text2)
End
Sub
Program yang sudah Jadinya bisa anda download DISINI
No comments:
Post a Comment