cara/tutorial kakulator with VB.NET (versi myself)

  

   pada postingan kali ini saya coba membuat kalkulator di VB.NET yg saya coba buat sesuai keinginan saya,,

langkah pertama buatlah bentuk seperti gambar di atas setting lah pada nama pada kolom propertise anda.

kedua ,saya mulai dari button pada operator [+] ,double klik pada button lalu masukan syntax berikut:

        Dim angka1 As Integer
Dim angka2 As Integer
Dim hasil As Integer

angka1 = Val(TextBox1.Text)
angka2 = Val(TextBox2.Text)
hasil = angka1 + angka2
TextBox3.Text = hasil

ketiga ,lanjutkan dengan mengisikan pada button pada operator [-] ,double klik pada button lalu masukan syntax berikut:

        Dim angka1 As Integer
Dim angka2 As Integer
Dim hasil As Integer

angka1 = Val(TextBox1.Text)
angka2 = Val(TextBox2.Text)
hasil = angka1 - angka2
TextBox3.Text = hasil

keempat ,lanjutkan dengan mengisikan pada button pada operator [*] ,double klik pada button lalu masukan syntax berikut:

        Dim angka1 As Integer
Dim angka2 As Integer
Dim hasil As Integer

angka1 = Val(TextBox1.Text)
angka2 = Val(TextBox2.Text)
hasil = angka1 * angka2
TextBox3.Text = hasil

kelima ,lanjutkan dengan mengisikan pada button pada operator [Rata-rata] ,double klik pada button lalu masukan syntax berikut:

        Dim angka1 As Integer
Dim angka2 As Integer
Dim hasil As Integer

angka1 = Val(TextBox1.Text)
angka2 = Val(TextBox2.Text)
hasil = angka1 + angka2 / 2
TextBox3.Text = hasil

keenam ,lanjutkan dengan mengisikan pada button pada operator [^] ,double klik pada button lalu masukan syntax berikut:

Dim angka1 As Integer
Dim angka2 As Integer
Dim hasil As Integer

angka1 = Val(TextBox1.Text)
angka2 = Val(TextBox2.Text)
hasil = angka1 ^ angka2
TextBox3.Text = hasil

ketujuh ,lanjutkan dengan mengisikan pada button pada operator [/] ,double klik pada button lalu masukan syntax berikut:

Dim angka1 As Integer
Dim angka2 As Integer
Dim hasil As Integer

angka1 = Val(TextBox1.Text)
angka2 = Val(TextBox2.Text)
hasil = angka1 / angka2
TextBox3.Text = hasil

kedelapan ,lanjutkan dengan mengisikan pada button pada operator [mod] ,double klik pada button lalu masukan syntax berikut:

Dim angka1 As Integer
Dim angka2 As Integer
Dim hasil As Integer

angka1 = Val(TextBox1.Text)
angka2 = Val(TextBox2.Text)
hasil = angka1 mod angka2
TextBox3.Text = hasil

kesembilan ,lanjutkan dengan mengisikan button pada exit ,double klik pada button lalu masukan syntax berikut:

Me.Close()

 

lalu kita compailer ,dan program pun siap di jalankan...jika ada yang tidak bisa d compailer anda bisa meninggal kan comment d postingan ini,selamat mencoba teman-teman

.

Anda baru saja membaca artikel yang berkategori vb.net dengan judul cara/tutorial kakulator with VB.NET (versi myself). Anda bisa bookmark halaman ini dengan URL https://find-share.blogspot.com/2013/07/caratutorial-kakulator-with-vbnet-versi.html. Terima kasih!

Ditulis oleh: Unknown - Kamis, 11 Juli 2013