Siapkan alat tempur :
- Laptop
- Aplikasi Visual Studio
- Kopi
- Niat dan sedikit usaha
- Buka aplikasi Visual Studio kalian Tampilan awal 
- Klik File > New > Project dan akan muncul seperti gambar dibawah, lalu cari bahasa Visual Basic dan pilih Windows Form Application, isikan juga Nama project, Lokasi Penyimpanan dan Solution Name(sesuaikan dengan nama project saja)
 Isikan Nama project, Lokasi Penyimpanan, dan Solution name 
- Akan muncul jendela seperti dibawah, dan kalian cari Tab Toolbox yang disebelah kanan disamping Solution Explorer biasanya, dan pin agar tidak auto hidden.
 Tampilan New Project 
- Kemudian kalian cari Button, dan TextBox didalam tab Toolboxdan susun seperti gambar dibawahSesuaikan seperti gambar 
- Kemudian klik kanan pada TextBox dan pilih property, lalu isikan data sesuai gambar dibawah Isikan data 
- Kemudian klik kanan pada Button1 dan isikan datanya seperti ini  Ini tombol untuk menghapus 
- Isikan juga tombol yang lain dengan cara yang sama seperti langkah nomer 6
  Isi Property Tombol angka pada kalkulator 
- Untuk tombol plus, minus, kali dan bagi, isikan datanya seperti ini Isi Property tombol operator plus minus kali bagi 
- Dan hasilnya akan seperti ini 
- Kemudian double klik Tombol angka 1, maka akan diarahkan ke kode area dan isikan kode diantara Private Sub dan End Sub, lalu masukan kode berikut
- Lalu double klik juga tombol no 2 dan masukan kode 
 txtText.Text = txtText.Text & 2
- Ulangi sampai tombol nomer 9 dan jangan lupa tombol 0 juga, tinggal mengganti angka yang dibelakang dan sesuaikan dengan nomor tombol
- Selanjutnya kita buat variabel untuk menampung nilai pada kalkulator, masukan kode berikut dibawah Public Class Form1
 Dim firstnumber As Integer
 Dim secondnumber As Integer
 Dim answer As Integer
 Dim aritmathicproccess As String
 
- Selanjutnya kita akan setting tombol aritmatikanya, double klik tombol plus dan masukan kode berikut diantara Private sub dan End sub
firstnumber = Val(TextBox1.Text)
 TextBox1.Text = ""
 aritmathicproccess = "+"
 Masukan juga kode seperti diatas untuk tanda minus, kali, dan bagi dan tinggal mengganti tanda minus dengan "-", kali dengan "*", dan bagi dengan "/". dan hasilnya akan seperti ini
 
- Langkah terakhir yaitu seting tombol hasil (=) dan seperti biasa, double klik tombol = dan masukan kode berikut
secondnumber = Val(TextBox1.Text)
 
 If aritmathicproccess = "+" Then
 answer = firstnumber + secondnumber
 End If
 
 If aritmathicproccess = "-" Then
 answer = firstnumber - secondnumber
 End If
 
 If aritmathicproccess = "*" Then
 answer = firstnumber * secondnumber
 End If
 
 If aritmathicproccess = "/" Then
 answer = firstnumber / secondnumber
 End If
 
 TextBox1.Text = answer
 
- Oh iya masih 1 step lagi gan, heheh seting tombol CE untuk menghapus nilai, caranya masukan kode ini di tombol CE 
TextBox1.Text = ""
- Alhamdulillah selesai, kita coba debug aplikasinya dengan tekan f5 atau pilih menu debug > start debugging lihat hasilnyaaini buatan ane gan 
txtText.Text = txtText.Text & 1 










 
Sungguh membantu menambah ilmu, tapi buat jadiin file exe yang bisa di instal gimana yah ? Hhhee maaf mereportkan.
ReplyDelete