MODUL PEMROGRAMAN VISUAL BASIC
 


PENGENALAN VISUAL BASIC 
TUJUAN 
- Memahami platform Microsoft .NET; 
- Mengenal Integrated Development Environment (IDE) Visual Basic .NET;
- Memahami struktur project Visual Basic .NET;
- Memahami jenis-jenis aplikasi .NET;
- Mampu membangun Graphical User Interface (GUI) menggunakan Visual Basic .NET;

DASAR TEORI
Platform .NET Framework
Microsoft .NET yang awalnya disebut Next Generation Windows Services (NGWS) adalah suatu platform untuk membangun dan menjalankan generasi penerus aplikasi-aplikasi terdistribusi. Microsoft.NET merupakan framework (kerangka) pengembangan yang menyediakan antarmuka pemrograman baru untuk layanan Windows dan API (Application Programming Interface).Microsoft .NET merupakan strategi Microsoft untuk menghubungkan sistem, informasi, dan alat (device), sehingga orang dapat berkomunikasi serta berkolaborasi dengan lebih efektif. Teknologi .NET terintegrasi penuh melalui produk-produk Microsoft, dan menyediakan kemampuan untuk mengembangkan solusi dengan menggunakan Web service. Platform Microsoft .NET terdiri dari lima komponen utama yang
tersusun dalam tiga lapisan (layer). Lapisan paling bawah adalah sistem operasi;lapisan kedua terdiri dari tiga komponen; lapisan teratas adalah Visual Studio .NET.
 
Visual Studio .NET
Microsoft Visual Studio .NET merupakan kumpulan lengkap tools pengembangan untuk membangun aplikasi Web ASP.NET, XML Web Services, aplikasi dekstop, dan aplikasi mobile. Di dalam Visual Studio inilah bahasa-bahasa pemrograman .NET seperti Visual Basic, Visual C++, Visual C# (CSharp), dan Visual J# (JSharp). Semuanya menggunakan lingkungan pengembangan terintegrasi atau IDE yang sama sehingga memungkinkan untuk saling berbagi tools dan fasilitas.
 
Visual Basic .NET
Visual Basic .NET (atau VB.NET) merupakan salah satu bahasa pemrograman yang bisa digunakan untuk membangun aplikasi-aplikasi.NET di platform Microsoft .NET. Tidak seperti generasi sebelumnya Visual Basic versi 6.0 ke bawah yang lebih difokuskan untuk pengembangan aplikasi desktop, Visual Basic .NET memungkinkan para pengembang membangun bermacam aplikasi, baik desktop maupun aplikasi web. Seiring dengan perkembangan aplikasi perangkat lunak yang semakin kompleks, saat ini Visual Basic .NET terbaru (Visual Basic 2008).

IDE Visual Basic
IDE (Integrated Development Environment), atau juga disebut sebagai Integrated Design/Debugging Environment, adalah perangkat lunak komputer yang berfungsi untuk membantu pemrogram dalam mengembangkan perangkat lunak. Singkatnya, IDE merupakan suatu lingkungan pengembangan aplikasi yang terintegrasi; lengkap dengan beragam tools atau utilitas pendukung.
 
PROSEDUR PRAKTIKUM
Membuat Project Baru
Project merupakan kerangka dasar aplikasi yang sangat menentukan jenis aplikasi yang akan dibuat. Untuk memulai pembuatan project, ikuti langkah-langkah berikut:
1. Jalankan Visual Basic 2008 Express Edition.
2. Klik menu File --> New Project, atau melalui ikon New Project, atau melalui kombinasi tombol Ctrl+N.
3. Pada kotak dialog New Project, pilih template Windows Application, kemudian klik OK.

Windows ( Windows Form, Concole, Class Library, WPF dll)
Web (ASP Web Application, ASP.Net Web Servis dll)
Smart Divice (Smart Device Project)
Database (Access dan SQL Server)
Report (Report Application dan Crystal Report)
WCF (Windows Communication Foundation) dll.
Windows Application. Untuk menciptakan aplikasi-aplikasi Windows yang berjalan secara lokal di komputer user.
Class Library. Untuk menciptakan kelas-kelas atau komponenkomponen reusable yang dapat di-share dengan project lainnya.
Console Application. Untuk membuat aplikasi-aplikasi command-line.

Mengenal IDE Visual Basic 2008
Dalam upaya memudahkan penggunaan IDE, maka diperlukan pemahaman yang baik
mengenai IDE Visual Basic 2008
Interface dan Keterangan
Menu Bar : Menu standar pada visual Basic
Toolbar Daftar adalah tool yang digunakan untuk menjalankan perintah yang sering digunakan
Toolbox adalah Daftar control yang tambahkan ke dalam program sebagai interface
Form Design adalah Digunakan untuk mengedit tampilan form serta mengatur posisi  control pada form
Solution Explorer adalah Digunakan untuk mengolah file dan project
Properties adalah Digunakan untuk mengedit property dari form dan control yang sedang diedit
Error List adalah Digunakan untuk menampilkan pesan error jika terjadi kesalahan

Membuat Aplikasi Windows
1. Buat project baru, atau lanjutkan project pertama Anda sebelumnya.
2. Tambahkan sebuah kontrol Label ke form, dengan cara mengklik ganda Label di Toolbox,
atau men-drag Label ke form. Atur propertinya seperti tabel berikut:

3. Tambahkan Event Load pada form dengan salah satu cara berikut:
a. Klik ganda area form kosong.
b. Klik area form kosong, kemudian tekan F7.
4. Lengkapi kode event handler-nya seperti berikut:

Public Class Form1
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
' Men-set teks kontrol label
Me.lblText.Text = "Belajar Pemrograman Visual Basic"
End Sub
End Class

5. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start
Debugging di toolbar, atau melalui menu Debug > Start Debuging.
6. Simpan aplikasi Anda.
Membuat Aplikasi Console
1. Buat project baru, pilih template Console Application, kemudian klik OK.
2. Lengkapi kode programnya seperti berikut
Module Module1
Sub Main()
' Mencetak teks ke console
Console.WriteLine("Apa Kabar Teman-Teman ")
Console.WriteLine("Selamat Belajar Pemrograman Visual")
Console.Read()
End Sub
End Module

3. Tekan F5 untuk menjalankan aplikasi.
4. Simpan aplikasi Anda
 
TIPE DATA, VARIABEL, KONSTANTA DAN OPERATOR
TUJUAN
- Memahami dan mengenal Tipe Data, Variabel, Konstanta dan Operator
- Dapat membuat aplikasi sederhana dengan menggunakan Tipe Data, Variabel, Konstanta
dan Operator.
Tipe Data
Tipe data merupakan suatu bentuk penggolongan jenis data berdasarkan kategori data, ukuran dan kegunaan data yang dapat ditampung oleh sebuah variabel. Tipe data pada visual basic 2008 dapat dilihat pada table berikut ini :


Konversi Tipe Data
Konversi Tipe data adalah sebuah fungsi yang digunakan untuk mengkonversi ( mengubah tipe dari satu tipe ke tipe data yang lain). Konversi tipe data dapat dilihat pada table berikut ini :

 
Variabel
Variabel adalah merupakan tempat penyimpanan data dalam memori computer yang mengandung data atau nilai sementara dari sebuah proses pada suatu pemrograman.
Deklarasi Variabel
Deklarasi Variabel adalah merupakan fungsi untuk mengenal suatu variabel berikut dengan tipe data yang pakai pada variabel tersebut. Pendeklarasian variabel di bagi menjadi dua
kategori antara lain :
1. Deklarasi Ekplisit
Suatu pendeklarasian umum yang sangat sering dilakukan dengan memberikan kata kunci
as.
Bentuk umum :
{Private | Public | Dim | …} Nama_Var [{As Tipe data}]
Contoh :
Dim Nim as Integer
Dim Nama as String
2. Deklarasi Emplisit
Deklarasi Emplisit adalah suatu pendeklarasian yang tidak memberikan kata kunci As pada semua variabel tersebut. Melainkan memberikan satu karakter atau symbol di akhir variabel. Tabel symbol deklarasi emplisit.
 
Contoh :
Dim NIM% ‘mewakili tipe data integer
Dim Nama$ ‘ mewakili tipe data string
Ruang Lingkup Variabel
Ruang lingkup variabel sangat mempengaruhi sampai dimana nama variabel tersebut dapat dikenali oleh aplikasi. Ruang Lingkup Variabel dapat digolongkan menjadi :
1. Local Variabel
Local variabel merupakan suatu pendeklarasian variabel di dalam ruang lingkup objek saja. Tidak dapat digunakan di dalam objek lain.
2. Global Variabel
Global variabel adalah merupakan suatu pendeklarasian variabel tidak hanya di dalam
ruang lingkup objek saja. Tetapi mencakup semua presedure dan objek
Konstanta
Konstanta merupakan suatu variabel yang mempunyai nilai tetap dan tidak dapat diubah
nilainya.
Deklarasi Konstanta
Deklarasi konstanta :
{Const} Nama_Var [{AS tipedata}]=<nilai>
Contoh :
Const nama_bidang as string=”persegi_panjang”
Public const Panjang As Integer=8
Private const Lebar As Integer=5
Private const luas As Integer=Panjang*Lebar
Private const Keliling As Integer=2*(Panjang+Lebar)

Deklarasi Konstanta Enumerasi
Deklarasi Konstanta Enumerasi merupakan pendeklarasian daftar konstanta yang bersipat global . Dengan deklarasi konstanta enumerasi dapat membuat daftar konstanta sendiri dalam bentuk seperti modul kelas dan dapat diakses oleh projek lain.
Format penulisannya :
{Private | Public | …. }[enum] Nama_Variabel_konstanta
Contoh :
Const nama_bidang as string=”persegi_panjang”
Private const Panjang As Integer=8
Private const Lebar As Integer=5
Private const luas As Integer=Panjang*Lebar
Private const Keliling As Integer=2*(Panjang+Lebar)
Public enum Hitung
Luas = Luas
Keliling=Keliling
end Enum
A=Hitung.Luas ‘menggunakan variabel enum luas
B=Hitung.Keliling ‘ menggunakan variabel enum keliling
Operator
Operator Aritmatika
Operator Aritmatika adalah merupakan suatu operator perhitungan matematika yang digunakan untuk proses perhitungan matematika. Operator aritmatika dapat dilihat pada table berikut ini

 
Operator Perbandingan
Operator perbandingan adalah merupakan suatu operator yang menyatakan suatu kondisi itu benar atau salah. Operator perbandingan dapat dilihat pada table berikut ini :


Operator Logika
Operator Logika adalah merupakan suatu operator yang dapat membandingkan dua ekspresi atau lebih data logika (Boolean) dan menghasilkan data logika (Boolean) baru. Operator logika dapat dilihat pada table berikut ini:


Operator Penugasan
Operator penugasan adalah merupakan operator yang bertugas untuk menentukan nilai yang dikeluarkan oleh suatu variabel terhadap kondisi tertentu.


Operator Penggabungan (Concatenation)
Operator Penggabungan adalah merupakan suatu operator yang dapat digunakan untuk menggabungkan dua buah string atau lebih. Operator Penggabungan dapat dilihat pada table berikut ini :


A. PRAKTIKUM
Variabel Lokal
1. Buat project baru, dengan nama Prak3.
2. Desain Tampilan form seperti gambar berikut ini

3. Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel
berikut:

4. Klik ganda pada BtnExit1, kemudian ketikkan kode program berikut ini :
 
Dim tutup As String
tutup = MessageBox.Show("Anda yakin tutup form ini ?", "Lokal Variabel", MessageBoxButtons.YesNo,
MessageBoxIcon.Question)
If tutup = MsgBoxResult.Yes Then
End
Else
End If

5. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start Debugging di toolbar, atau melalui menu Debug > Start Debuging.
6. Simpan aplikasi Anda.
Variabel Global
1. Tambahkan form baru , dengan nama Form2.
2. Desain Tampilan form seperti gambar berikut ini

3. Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel
berikut

4. Klik ganda pada Form2, kemudian ketikkan kode program berikut ini
Public Class Form2
Dim tutup As String
5. Klik ganda pada BtnExit, kemudian ketikkan kode program berikut ini :
tutup = MessageBox.Show("Anda yakin tutup form ini ?", "Global Variabel", MessageBoxButtons.YesNo,
MessageBoxIcon.Question)
If tutup = MsgBoxResult.Yes Then
End
Else
End If
6. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start
Debugging di toolbar, atau melalui menu Debug > Start Debuging.
7. Simpan aplikasi Anda.
Operator
1. Tambahkan Form baru, dengan nama Form3.
2. Desain Tampilan form seperti gambar berikut ini

3. Tambahkan kontrol ke form seperti pada gambar diatas dan atur propertinya seperti tabel
berikut:

4. Klik ganda pada Form3, kemudian ketikkan kode program berikut ini
CmbOperator.Items.Add("+")
CmbOperator.Items.Add("-")
CmbOperator.Items.Add("x")
CmbOperator.Items.Add("/")
CmbOperator.Items.Add("Sisa")
CmbOperator.Items.Add("Pangkat")
CmbOperator.Items.Add("<>")
CmbOperator.Items.Add("<")
CmbOperator.Items.Add(">")
CmbOperator.Items.Add("<=")
CmbOperator.Items.Add(">=")
CmbOperator.Items.Add("Like")
CmbOperator.Items.Add("Not")
CmbOperator.Items.Add("And")
CmbOperator.Items.Add("Or")
CmbOperator.Items.Add("Xor")
CmbOperator.Items.Add("+p")
CmbOperator.Items.Add("&")

5. Klik ganda pada tombol Proses, lalu ketikkan kode program berikut ini :
Select Case CmbOperator.Text
Case "+"
TxtHasil.Text = Val(TxtNilai1.Text) + Val(TxtNilai2.Text)
Case "-"
TxtHasil.Text = Val(TxtNilai1.Text) - Val(TxtNilai2.Text)
Case "x"
TxtHasil.Text = Val(TxtNilai1.Text) * Val(TxtNilai2.Text)
Case "/"
TxtHasil.Text = Val(TxtNilai1.Text) / Val(TxtNilai2.Text)
Case "Sisa"
TxtHasil.Text = Val(TxtNilai1.Text) mod Val(TxtNilai2.Text)
Case "Pangkat"
TxtHasil.Text = Val(TxtNilai1.Text) ^ Val(TxtNilai2.Text)
Case "<>"
TxtHasil.Text = TxtNilai1.Text <> TxtNilai2.Text
Case "<"
TxtHasil.Text = TxtNilai1.Text < TxtNilai2.Text
Case ">"
TxtHasil.Text = TxtNilai1.Text > TxtNilai2.Text
Case "<="
TxtHasil.Text = TxtNilai1.Text <= TxtNilai2.Text
Case ">="
TxtHasil.Text = TxtNilai1.Text >= TxtNilai2.Text
Case "Like"
TxtHasil.Text = TxtNilai1.Text Like TxtNilai2.Text
Case "Not"
TxtHasil.Text = Not TxtNilai1.Text = TxtNilai2.Text
Case "And"
TxtHasil.Text = TxtNilai1.Text = "SMK_ALFALAH" And TxtNilai2.Text = "SMK_ALFALAH"
Case "Or"
TxtHasil.Text = TxtNilai1.Text = "SMK_ALFALAH" Or TxtNilai2.Text = "SMK_ALFALAH"
Case "Xor"
TxtHasil.Text = TxtNilai1.Text = "SMK_ALFALAH" Xor TxtNilai2.Text = "SMK_ALFALAH"
Case "+P"
TxtHasil.Text = TxtNilai1.Text + TxtNilai2.Text
Case "&"
TxtHasil.Text = TxtNilai1.Text & TxtNilai2.Text
End Select
6. Jalankan aplikasi dengan menekan tombol F5 (di keyboard), atau melalui ikon Start
Debugging di toolbar, atau melalui menu Debug > Start Debuging.
7. Simpan aplikasi Anda.