MEMBUAT APLIKASI PENJUALAN SEDERHANA DENGAN MICROSOFT VISUAL BASIC 2008

APLIKASI PENJUALAN SEDERHANA

 Desain program seperti tampilan Berikut

 isi coding berikut ini pada Form code

 setelah mengisi coding jalankan program dengan cara

Click Tombol Debugging pada Menu

 

TIPE DATA DAN VARIABEL - Modul-3

TIPE DATA DAN VARIABEL DALAM VB.NET 

• TIPE DATA

Tipe Data merupakan suatu bentuk penggolongan jenis data berdasarkan kategori Data, Ukuran dan kegunaan data yang dapat ditampung oleh sebuah variabel. Seperti bahasa pemrograman yang lain, Visual Basic .Net juga menyediakan berbagai tipe data yang dapat digunakan oleh pemrograman sesuai dengan konteks pemakaiannya.

Berikut beberapa tipe data yang tersedia dalam VB.Net yang sering digunakan.

Data Type	Size in Bytes	Return Value	Type
Tipe Data Numeric
Byte	1	8-bit unsigned integer (0 – 255)	System.Byte
Integer	3	32-bit signed integer (-2.147.483.648 s/d 2.147.483.647)	System.Int32
Long	8	64-bit signed integer -9.223.372.036.854.775.808 s/d  9.223.372.036.854.775.807	System.Int64
Double	8	64-bit floating point variabel (5E-324 s/d 1.8E+10308)	System.Double
Decimal	16	128-bit floating point variabel (Nilai hingga 28 digit)	System.Decimal
Tipe Data Karakter
Char	2	16-bit unicode characters	System.Char
String	Varies	Non-Numeric Type	System.String
Tipe Data Tanggal
Date	8	0:00:00 on Januari 1, 0001 through 11:59:59 PM on December 31, 9999	System.Date
Tipe Data Logika
Boolean	2	True or False	System.Boolean
Tipe Data Object
Object	4	Any type can be stored in variable of type object	System.Object

 

Di setiap tipe diatas, yang menjadi perbedaan hanyalah ukuran dan jangkauan nilainya saja, semakin besar ukurannya semakin banyak memakan memori didalam computer kita, tetapi jika semakin panjang jangkauan nilainya maka perhitungannya pun akan semakin akurat.

Tipe data byte, char, short dan integer adalah tipe yang digunakan untuk menghitung bilangan bulat alias tanpa koma-koma.Jadi kalau hanya mengghitung bilangan bulat yang standar saja, sebaiknya menggunakan Tipe data byte atau integer.

Tipe data long, decimal, single dan double digunakan untuk menghitungan bilangan decimal atau real yang ada koma-komaannya.Jika menghitung pengkonversian suhu yang notabene memerlukan penghitungan yang akurat sebaiknya menggunakan tipe decimal atau single.

Tipe data string Yaitu tipe data yang bisa memasukkan semua huruf, semua angka atau semua symbol atau kombinasi dari ketiganya, khusus untuk angka nih, walaupun kita memasukkan angka tapi tetap saja angka tersebut dianggap sebuah string dalam artian angka tersebut tidak bisa diproses (tidak bisa ditambahkan, dikurangi, dikali, dibagi, atau yang lainnya).

Tipe data Boolean adalah tipe data yang memiliki nilai True atau False, jika suatu nilai yang berupa angka dikonversi menjadi nilai Boolean maka angka 0 akan menjadi false dan angka selain 0 menjadi True.

Tipe data Date yaitu tipe data untuk memasukkan tanggal, memiliki rentang mulai dari 1 Januari tahun 0001 sampai 31 desember 9999.

• VARIABEL

Variabel adalah tempat untuk menyimpan suatu nilai, bisa dibilang variabel adalah sebuah wadah yang diisi oleh suatu nilai tertentu.
Variabel memiliki sebuah nama disertai dengan tipe data yang akan ditampung oleh variabel tersebut.

Deklarasi Variabel

Dim merupakan keyword dalam pendeklarasian variabel.

Bentuk penulisan Deklarasi Variabel:

Dim (namavariabel) as (tipedata)

 

Contoh:

Dim a,b as integer

Dim i as string

Pemberian Nilai Awal Variabel

Bentuk Penulisan :

(namavariabel) = NilaiAwal

 

Contoh: 

a=10

b=5

i=“Visual Basic” 

Pendeklarasian Variabel disertai pemberian Nilai Awal

Bentuk Penulisan:

Dim (namavariabel) as (tipedata)  = NilaiAwal

Contoh:

Dim a as integer = 10

Dim i as string = “Visual Basic”

Contoh Program

 Desain Form seperti gambar berikut ini.

isi coding berikut ini

Double Klick tombol Button1

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim x, y, z As Integer
        x = 20
        y = 5
        z = x * y
        TextBox1.Text = z
    End Sub
End Class 

Jalankan program, maka hasilnya seperti berikut

Operasi Terhadap Tipe Data Numeric

Operasi terhadap tipe data numeric sama halnya melakukan perhitungan matematik atau aritmatika. Ada penjumlahan, pengurangan, perkalian, pembagian, dan sebagainya.

Untuk melakukan perhitungan matematika dibutuhkan operator aritmatika.

Berikut operator aritmatika sesuai urutan pengerjaannya :

^     :    perpangkatan

*      :    perkalian

/      :    pembagian

+     :    penjumlahan

          -     :           pengurangan

Contoh Program

KALKULATOR SEDERHANA

1. Desain Awal program

Tampilan program awal

2. Ubah Parameter Name  dan Teks pada Properties:

NO.	OBJEK	PROPERTIES	PENGATURAN
1	Label1	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
		Backcolor	Red
10	Button2	Text	*
		Size	10
		Name	Btnkali
		Backcolor	Blue
11	Button3	Text	/
		Name	Btnbagi
		Size	10
		Backcolor	Yellow
12	Button4	Text	+
		Size	9
		Name	Btntambah
		Backcolor	Lime
13	Button5	Text	-
		Size	10
		Name	Btnkurang
		Backcolor	green
14	Button6	Text	Bersih
		Name	Btnbersih
15	Button7	Text	Tutup
		Name	Btntutup

3. Setelah Parameter Name  dan Teks pada Properties di ubah maka tampilannya akan menjadi seperti berikut ini

4. Setelah itu isi coding berikut ini dengan cara double klik pada masing-masing Button (^,*,/,+,-).

Public Class Form1
    Private Sub BtnPangkat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnpangkat.Click
        Txthasil.Text = Txtbil1.Text ^ Txtbil2.Text
    End Sub

    Private Sub BtnKali_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnkali.Click
        Txthasil.Text = Txtbil1.Text * Txtbil2.Text
    End Sub

    Private Sub BtnBagi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnbagi.Click
        Txthasil.Text = Txtbil1.Text / Txtbil2.Text
    End Sub

    Private Sub BtnTambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btntambah.Click
        Txthasil.Text = Txtbil1.Text + Txtbil2.Text
    End Sub

    Private Sub BtnKurang_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnkurang.Click
        Txthasil.Text = Txtbil1.Text - Txtbil2.Text
    End Sub

    Private Sub BtnBersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnbersih.Click
        Txtbil1.Clear()
        Txtbil2.Clear()
        Txthasil.Clear()
    End Sub

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

5. Setelah selesai mengisi code.

tekan tombol Start Debugging

Tampilan Hasil Debugging

LATIHAN

Membuat program penghitungan luas dan keliling persegi panjang

• Desain Awal Program

•  Ubah Parameter Name  dan Teks pada Properties:

  NO.	OBJEK	PROPERTIES	PENGATURAN
  1	Label1	Text	Program Persegi Panjang
  		Font Size	9
  		Bold	True
  2	Label2	Text	Panjang :
  3	Label3	Text	Lebar :
  4	Label4	Text	Luas :
  5	Label5	Text	Keliling :
  6	TextBox1	Name	TxtP
  7	TextBox2	Name	TxtL
  8	TextBox3	Name	TxtLuas
  9	TextBox4	Name	TxtKel
  10	GroupBox1	Text	INPUT
  		Forecolour	Blue
  11	GroupBox2	Text	Hasil
  		Forecolour	Red
  		Name	Btnpangkat
  		Backcolor	Red
  12	Button1	Text	Proses
  		Name	BtnProses
  13	Button2	Text	Bersih
  		Name	Btnbersih
  14	Button3	Text	Tutup
  		Name	Btntutup

• Setelah Parameter Name  dan Teks pada Properties di ubah maka tampilannya akan menjadi seperti berikut ini
  

• Setelah itu isi coding berikut ini dengan cara double klik pada masing-masing Button (Proses, Bersih, Tutup)

Public Class Form2

Private Sub BtnProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnProses.Click
TxtLuas.Text = TxtP.Text * TxtL.Text
TxtKel.Text = 2 * TxtP.Text * TxtL.Text
End Sub

Private Sub BtnBersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnBersih.Click
TxtL.Clear()
TxtP.Clear()
TxtKel.Clear()
TxtLuas.Clear()
End Sub

Private Sub BtnTutup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnTutup.Click
End
End Sub
End Class

• Setelah selesai mengisi code.

tekan tombol Start Debugging untuk menjalankan program

Hasil Program

 Sekian pembahasan tentang TIPE DATA dan VARIABEL.