Membuat Kalkulator Sederhana Menggunakan Microsoft Visual Basic 2008

Assalamualaikum wr.wb
Kali ini sama seperti biasa saya ingin berbagi sedikit ilmu yang saya ketahui di salah satu mata kuliah saya pada teman teman semua, yaitu tentang bagaimana langkah- langkah dalam membuat 'Kalkulator Sederhana' pada Microsoft Visual Studio 2008.
Baiklah langsung saja kita mulai..



1. Buka Aplikasi Microsoft Visual Studio-nya dulu guys.
   - Klik Tombol Start - All Programs - Pilih Folder Microsoft Visual Studio 2008 - klik aplikasi Microsoft Visual Studio 2008 atau klik tombol start - klik di Run - ketikan Microsoft Visual Studio 2008 pada kotak Run (Search Programs and files)
tampilan awal Microsoft Visual Studio

2. Untuk Memulainya, kita buka dulu lembar atau project barunya guys, caranya :
    - klik menu file di atas sebelah kiri - klik new - klik project ( Ctrl + Shift + N )
tampilan awal/sebelum membuka project baru

 tampilan setelah membuka project baru

3. Setelah kita membuka project baru, lalu klik toolbox pada sisi sebelah kiri form dan akan muncul berbacam tools yang akan kita gunakan nantinya, untuk membuat kalkulator sederhana, disini kita menggunakan 5 Label, 3 Textbox, dan 7 Button, caranya gini guys:

- Kita liat di toolbox (all windows form), lalu cari yang namanya Label, Textbox, dan Button. jika uda ketemu nama-nama tools tersebut, klik toolnya dan klik drag pada form, dan disainlah form-nya seperti ini guys. 
 Tampilan disain form sebelum diubah nama tools-nya

4. Jika sudah di disain form-nya, maka selanjutnya kita atur tools nya atau kita ubah text, name, dan size-nya guys, intinya disini kita ubah pengaturan disain nya guys. caranya klik saja tools yang ada di form lalu liat properties yang ada dikanan bawah, disitu tersedia semua pengaturan tools.
  
ini dia guys, daftar pengaturan yang akan kita ubah disain tools-nya  
NO
OBJEK
PROPERTIES
PENGATURAN
1
Label 1
Text
OPERASI MATEMATIKA
Font Size
9
Bold
True
2
Label2
Text
Bilangan 1 :
3
Label3
Text
Bilangan 2 :
4
Label4
Text
Hasil           :
5
Label5
Text
OPERATOR
Bold
True
6
Textbox1
Name
Txtbil1
7
Textbox2
Name
Txtbil2
8
Textbox3
Name
Txthasil
9
Button1
Text
^
Size
10
Name
Btnpangkat
10
Button2
Text
*
Size
10
Name
Btnkali
11
Button3
Text
/
Size
10
Name
Btnbagi
12
Button4
Text
+
Size
10
Name
Btntambah
13
Button5
Text
-
Size
10
Name
Btnkurang
14
Button6
Text
Bersih
Name
Btnbersih
15
Button7
Text
Tutup
Name
Btntutup
  
5. Dan jika sudah anda atur semua tools di form-nya, maka tampilannya akan seperti ini guys.
 
tampilan setelah mengubah atau mengatur tools form pada properties
  
6. Setelah semuanya telah terdisain maka kita program guys, caranya DOUBLE KLIK BUTTON yang uda kita disain tadi di form contoh Button1 (symbol "^" Btnpangkat), lalu akan masuk ke tempat pemrograman-nya guys, seperti gambar berikut. 
  
tampilan tempat pemrograman 

jika sudah seperti itu lanjutkan terus programnya sampai button tutup.

Ini dia guys daftar yang harus kita program untuk membuat kalkulator sederhananya
Public Class Form1
    Private Sub Form1_Load(ByVal sender AsSystem.Object, ByVal e As System.EventArgs)Handles MyBase.Load
    End Sub


Private Sub Btnpangkat_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs)Handles Btnpangkat.Click
        txthasil.Text = txtbil1.Text ^ txtbil1.Text
    End Sub

Private Sub Btnkali_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs)Handles Btnkali.Click
        txthasil.Text = txtbil1.Text * txtbil2.Text
    End Sub

Private Sub Btnbagi_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs)Handles Btnbagi.Click
        txthasil.Text = txtbil1.Text / txtbil2.Text
    End Sub

Private Sub Btntambah_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs)Handles Btntambah.Click
        txthasil.Text = Val(txtbil1.Text) + txtbil2.Text
    End Sub

Private Sub Btnkurang_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs)Handles Btnkurang.Click
        txthasil.Text = txtbil1.Text - txtbil2.Text
    End Sub

Private Sub Label4_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs)Handles Label4.Click
    End Sub

Private Sub Btntutup_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs)Handles Btntutup.Click
        End
    End Sub

    Private Sub Btnbersih_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs)Handles Btnbersih.Click
        txtbil1.Text = ""
        txtbil2.Text = ""
        txthasil.Text = ""
    End Sub
End Class
Untuk kata program di atas, jangan sekali - kali anda menghapus, mengubah, atau pun mengutak atiknya, karna program tersebut sudah dari Microsoft Visual Basicnya guys, jadi jangan sampai terhapus atau pun terubah karna bisa mengakibatkan error pada program.
dan untuk menginput programnya, jika kita double klik pada Button mama automatis akan masuk ke-tempat input program, dan kursor tepat berada pada atas "End Sub", jadi disitulah kita mnginput datanya, langung saja ketikan programnya guys.

7. jika sudah di prgram seluruhnya maka untuk menjalankan-nya klik PLAY yang berwarna hijau di toolbar,

 

jika semua program yang anda lakukan benar, maka jika anda klik PLAY secara automatis form akan muncul, dan jika terjadi error atau kesalahan memrogram coba anda liat lagi disain form yang anda buat, mungkin kesalahan nama atau saat mendisain "name" yang tidak cocok dengan program yang anda lakukan.

8. Nah guys, jika sudah selesai seluruhnya dan tidak ada error atau kesalahan program, maka anda sudah bisa menjalankan kalkulatornya, caranya, masukkan angka kedalam kotak (checkbox) yang telah tersedia di sebelah bilangan1 dan bilangan2, lalu klik salah satu symbol yang ada di OPERATOR, maka hasilnya akan muncul di kotak hasil,

 

semoga bermanfaat guys.. 

Komentar

Postingan populer dari blog ini

Keputusan Case Pada Microsoft Visual Studio 2008

Keputusan If Pada Microsoft Visual Studio 2008

Visual Basic Messagebox