Luthfie Fauzan 1601275594 Information System Bina Nusantara University http://www.binus.ac.id |
Langkah 1 :
Silahkan buat project baru dengan cara File > New ProjectLangkah 2 :
Pilih windows form aplication dan beri nama kalkulatorLangkah 3 :
Buat design seperti gambar di bawah iniLangkah 4 :
Klik 2 kali pada button 1 (tombol +) kemudian ketikan kode seperti di bawah ini.
TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
Klik 2 kali pada button 2 (tombol -) kemudian ketikan kode seperti di atas tetapi ganti tanda "+" menjadi "-" dan lakukan hal yang sama pada tombol yang lain tetapi ganti dari "+" menjadi "*" dan "/".
Langkah 5 :
Silahkan coba kalkulator yang telah anda buat dengan cara tekan tombol F5 di keyboard.Tambahan :
Berikut ini kode lengkap dari kalkulator sederhana.Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox3.Text = Val(TextBox1.Text) - Val(TextBox2.Text)
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
TextBox3.Text = Val(TextBox1.Text) * Val(TextBox2.Text)
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
TextBox3.Text = Val(TextBox1.Text) / Val(TextBox2.Text)
End Sub
End Class
Catatan :
Bilangan Pertama = Label 1Bilangan Kedua = Label 2
Hasil = Label 3
Jangan lupa menyimpan project yang telah di buat...