Header Ads Widget

Operasi Matematika Dasar dengan VB.NET

Assalamualaikum Warahmatullahi Wabarakatu
Bismillahirrahmanirrahiim

Dalam pembuatan program kita tidak bisa lepas dari yang namanya hitung-hitungan, kali ini saya akan membahas tentang hitung dasar matematika di VB.Net.



Perhitungan perkalian dengan simbol "*"
Perhitungan pembagian dengan simbol "/"
Perhitungan pengurangan dengan simbol "-"
Perhitungan penambahan dengan simbol "+"
Perhitungan sisabagi dengan simbol "Mod"
Perhitungan pangkat dengan simbol "^"

Untuk lebih jelasnya mari kita prakter membuat program dasar dengan operasi matematika di VB.Net

Langkah Pertama
Sobat buka VB.Net tahun 2010 atau versi lainnya selama dia VB.Net. Pada tutorial ini saya menggunakan VB.Net 2010

Langkah Kedua
Jika sudah terbuka, Pilih File > New Project > beri nama "tutorial" atau sesuai dengan keinginan Anda > Windows Forms Application > Click Ok

Langkah Ketiga
Buatlah design form seperti gambar dibawah ini


Setelah Anda membuat design seperti gambar diatas maka ganti nama-nama object yang akan digunakan

Untuk textbox Angka Ke 1 kasih nama TxtAngka1
Untuk textbox Angka Ke 2 kasih nama TxtAngka2
Untuk Button hitung kasih nama BtnHitung
Untuk Button reset kasih nama BtnReset
Untuk Label hasil yang sejajar dengan tambah kasih nama LblTambah
Untuk Label hasil yang sejajar dengan kurang kasih nama LblKurang
Untuk Label hasil yang sejajar dengan bagi kasih nama LblBagi
Untuk Label hasil yang sejajar dengan kali kasih nama LblKali
Untuk Label hasil yang sejajar dengan sisa bagi kasih nama LblSisaBagi
Untuk Label hasil yang sejajar dengan Pangkat kasih nama LblPangkat

Langkah Keempat
Jika sobat sudah menyelesaikan langkah ketiga selanjutnya klik 2x BtnHitung kemudian ketikan kode dibawah ini

1234567891011Dim x As Integer
Dim y As Integer
x = Val(TxtAngka1.Text)
y = Val(TxtAngka2.Text)

LblTambah.Text = x + y
LblKurang.Text = x - y
LblBagi.Text = x / y
LblKali.Text = x * y
LblSisaBagi.Text = x Mod y
LblPangkat.Text = x ^ y

Langkah Kelima
Jika sobat sudah menyelesaikan langkah keempat selanjutnya klik 2x BtnReset kemudian ketikan kode dibawah ini
12345678TxtAngka1.Text = ""
TxtAngka1.Text = ""
LblTambah.Text = "Hasil"
LblKurang.Text = "Hasil"
LblBagi.Text = "Hasil"
LblKali.Text = "Hasil"
LblSisaBagi.Text = "Hasil"
LblPangkat.Text = "Hasil"

Langkah Keenam
Jalan program yang anda buat jika benar maka kan ada hasil seperti dibawah ini, untuk pengisian data usahakan Angka ke 1 lebih besar dari Angka Ke 2




Sampai disini dulu tutorial dari kita, semoga tutorial ini bermanfaat bagi anda dan jika bermanfaat jangan lupa di share, atas segala kekuranganya mohon dimaafkan, jika ada yang ingin ditanyakan silahkan tinggalkan komentar.

Post a Comment

0 Comments

MrJazsohanisharma
Rekomendasi Untuk Anda ×