Membuat Kalkulator sederhana

Halo sobat semua setelah sekian lama mencari template2 yang cocok di blog akhirnya sampai juga untuk posting yang di tunggu-tunggu, oke.. kali ini ane mau share ke sobat semua cara membuat kalkulator sederhana dengan Visual Basic 6.0. Mungkin Sudah Banyak Yang Tau Cara membuat kalkulator tersebut di visual basic, tapi..
bagi yang belum tau ne ane bagiin cara-caranya, baiklah untuk mempersingkat waktu kita mulai. CARA MEMBUAT KALKULATOR 
1. Buka aplikasi Visual Basic 6.0 yang sudah di download dan di install. 

2. Disaat aplikasi VB itu terbuka maka aka nada jendela kecil seperti :  
3. Piliih yang standar EXE, klik Open. 
4. Buat Form seperti dibawah ini : 



5. Keteangan Form: • 3 label : o Label1 = Bilangan Pertama, o Label2 = Bilangan Kedua, dan o Label3 = Hasil. • 3 text : Text1, Text2, Text3. • 4 commond button : o Commond button1 = +, o Commond button2 = -, o Commond button3 = *, dan o Commond button4 = /. 
6. Hapus caption text1, tex2, dan tex3 dengan cara hapus pada caption yang ada di properties (lihat yang blok biru). Lihat gambar dibawah ini : 

7. Jika sudah maka ketiga text tersebut akan kosong. 
8. Sekarang kita memulai Coding, apa itu coding?? Kalo yang mau lebih tau silahkan download disini. 
9. Klik 2 kali di Command Button 1, 2, 3, dan 4 : 
10. Berikut codingnya : 
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 

11. Ingat bahwa Command1 itu tambah (+), command2 itu bagi (/), command3 itu kali (*), dan command 4 itu kurang (-). 
12. Selesai… setelah itu Run aplikasi yang sudah dibuat, maka hasilnya akan seperti ini : Oke .. seleesai sudah semuanya, semoga bermanfaat dan nantikan tutorial-tutorial selanjutnya. Terima Kasih, dan mohon maaf jika ada kesalahan. 

0 comments:

Post a Comment