CARA MEMBUAT APLIKASI KALKULATOR DENGAN VISUAL BASIC 2010

CARA MEMBUAT APLIKASI  KALKULATOR DENGAN VISUAL BASIC 2010

    Selamat berjumpa kembali bersama saya SA BELAJAR SA BERBAGI, pada kesempatan
 kami ini saya akan membagikan bagaimana cara membuat aplikasi Kalkutror sederhana 
menggunakan Visual basic 2010. Jadi sebelum teman-teman mempraktekkannnya
 teman-teman harus siapkan aplikasi Microsoft Visual Basic 2010.

1. Langkah pertaman yang teman-teman lakukan adalah halankan aplikasi
Visual basiacnya .


2. Langkah kedua adalah membuat projek baru dengan menekan New Project

3. Langkah yang ketiga adalah proses penamaan, namun sebelumnya pastikan 
temen-teman sudah berada pada Windows Form Application. Dan frameworknya 
adalah .NET Framework 4. Untuk nama Aplikasinya yaitu Kalkulator. 
Untuk Lokasi penyimpanan aplikasinya disini saya arahkan ke data 
E:\BELAJAR PEMROGRAMAN\, kalau teman-teman ingin membiarkan lokasih
default teman-teman bisa melihatnya pada Location. Dan selanjutnya klik OK

4. Setelah itu akan di tamplikan Form1. Di Form1 ini kita akan mendesign bagaimana 
bentuk dari pada kalkulator yang kita buat tersebut.

5. Proses design program kallkulator yang kita buat. Disini yang perlu kita persiapkan
 adalah :

6. Proses desaignnya kita akan masukkan 4 buah label, 2 buah Button, dan 2 buah TextBox.
Label, Button, dan TextBox ada di ToolBox sehingga kita akan menampilkan seperti berikut
 caranya boleh juga tekan Ctrl + Alt + X :


7. Dan untuk menamaplikan Properties juga sama Klik View kemudian Properties atau cukup
 tekan F4 :


8. Setelah menampilkan ToolBox dengan Properties. Proses selanjutnya adalah mendesaign
 atau memasukkan Tool yang dibutuhkan dalam pembuatan aplikasi kalkulator tersebut.
Disini kita akan petokan pada table yang kita buat pada langkah kelima (5).

a. Label  > yang pertama yaitu Nama aplikasihnya Properties Textnya diganti menjadi 
Kalkulator, yang selanjutnya adalah Label 1 kita Ganti dengan nama Angka I. 
dan selanjutnya hingga yang ke 4 yaitu label hasil untuk label hasil yang pertama 
di properties namenya teman-teman ganti dengan THasil.

Setelah insert kedalam form semua label yang di butuhkan langkah selanjutnya adalah
 kita gantikan Properties Text sekaligus dengan Properties Name. Properties Name
 terletak dibawahnya Properties Text.


b. TextBox1 dan 2 > Properties Name kita ganti dengan TAngka1, dan Tangka2. Perhatika
gambar berikut ini.

c. Button > di Button ini kita akan mengantikan name propertiesnya. Sesuai dengan letak 
desainnya, Misalnya Button Jumlah kita ganti dengan btnJumlah, dan yang seperti +, x, -, :
 teman-teman sesuaikan seperti berikut ini. Perthatikan gambar berikut.

Sehinnga akhirnya proses designya selesai seperti berikut ini. untuk mendesign sebuah 

tamplikasi program tergantung dari besic kita mendesignnya teman-teman.

Untuk membentuk design seperti pada point b diatas secara lengkap seperti berikut ini
 teman-teman. Setelah selesai mendesain temena diharuskan untuk menyimpan Proses 
desainnya dengan cara menekan tombol Save all () atau dengan menekan 
 Ctlr + Shift + S secara bersamaan.



9. Setelah sudah ubalah tampilannya sesuai dengan Kemauan teman-teman, misalnya seperti
ini. Saya telah merubah Font. Perhatikan gambar dibawah ini yang di tandai dengan warnah
merah.

10. Nah untuk proses slenjutnya kita akan membuat codingnya, 
a. yang pertama kita akan berikan kode pada tombol tambah (+) untuk itu cukup tekan
 dua kali pada tombol tambah (+). Kemudia tuliskan coding berikut ini.

b. yang kedua adalah tombol kurang, yang perlu di perhatikan adalah tombolnya jika di 
kurang makan angka 1 di kurangi dengan angka 2.

c. yang ketiga adalah tombol kali

d. yang keempat adalah tombol bagi.

e. yang terakhir adalah tombol clear buat coding terlebih dahulu dibawa Public Class 
Kalkulator

Setelah buat coding di tombol Clear panggil saja coding yang kita sudah buat di atas,
 perhatikan gambar dibawah ini.

Jadi call ulang() ini kita panggil dari Sub ulang().

Dibawah ini adalah codingnya.

Public Class Kalkulator

   Sub ulang()

       TAngka1.Text = ""

       TAngka2.Text = ""

       txtHasil.Text = ""

   End Sub

   Private Sub btnTambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles btnTambah.Click

       txtHasil.Text = Val(TAngka1.Text) + Val(TAngka2.Text)

   End Sub

   Private Sub btnKurang_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles btnKurang.Click

       txtHasil.Text = Val(TAngka1.Text) - Val(TAngka2.Text)

   End Sub

   Private Sub btnKali_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles btnKali.Click

       txtHasil.Text = Val(TAngka1.Text) * Val(TAngka2.Text)

   End Sub

   Private Sub btnBagi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles btnBagi.Click

       txtHasil.Text = Val(TAngka1.Text) / Val(TAngka2.Text)

   End Sub

   Private Sub btnUlang_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles btnUlang.Click

       Call ulang()

   End Sub

End Class

Download Softwarenya :