Rabu, 23 Mei 2018

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
 

Minggu, 20 Mei 2018

TIPE DATA DAN VARIABEL - Modul-3

Hasil gambar untuk LOGO VISUAL BASICTIPE 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.