1) Pengertian Visual Basic dan Sejarah Perkembangan dari Microsoft Visual Basic 2010

Visual basic adalah sebuah bahasa pemrograman yang berpusat pada object (Object Oriented
Programming) digunakan dalam pembuatan aplikasi Windows yang berbasis Graphical User
Interface, hal ini menjadikan Visual Basic menjadi bahasa pemrograman yang wajib
diketahui dan dikuasai oleh setiap programmer. Beberapa karakteristik obyek tidak dapat
dilakukan oleh Visual Basic misalnya seperti Inheritance tidak bisa module dan
Polymorphism secara terbatas bisa dilakukan dengan deklarasi class module yang mempunyai
Interface tertentu. Sifat Visual Basic tidak case sensitif.

Sejarah Visual Basic berawal dari perkembangan bahasa BASIC di Amerika Serikat pada
awal tahun 1960-an. Pada tahun 1982 IBM/PC diperkenalkan pada masyarakat yang
didalamnya, disertakan pula bahasa BASIC yang dikenal juga QuickBasic / QBASIC. Pada
tahun 1990-an DOS digantikan oleh Windows. Microsoft akhirnya membuat BASIC versi
Windows yang dikenal sebagai Microsoft Visual Basic. Awal perkembangan Visual Basic
yaitu :

 Dirintis proyek “Thunder”

 Pada tahun 1991, Visual Basic 1.0 dirilis untuk windows pada Comdex.

 Pada tahun 1992, Visual Basic 1.0 untuk DOS yang merupakan versi lanjutan dari
compiler BASIC, QuickBasic dan Sistem Professional Development BASIC.

 Pada November 1992, Visual Basic 2.0 dirilis dengan pemrograman yang cukup
mudah digunakan serta kecepatannya telah dimodifikasi.

 Pada tahun 1993, Visual Basic 3.0 yang dibagi menjadi versi standard dan
professional.

 Pada tahun 1995, merupakan versi pertama ynag dapat membuat windows 32 bit
sebaik versi 16 bit nya yaitu Visual Basic 4.0.

 Pada tahun 1997, Visual Basic 5.0 yang dirilis microsoft merilis secara eksklusif
untuk versi windows 32 bit.

 Pertengahan 1998, Visual Basic 6.0 dengan perbaikan beberapa cakupan temasuk
kemampuan dalam pembuatan Aplikasi Web-based.
  Pada tahun 2002, dirilis Visual [Link] (VB 7) dengan bahasa yang sangat powerful
namun bahasanya sangat berbeda dari yang sebelumnya.

 Pada Tahun 2003, dirilis Visual [Link] 2003 (VB 7.1) dengan menggunakan Net
framework versi 1.1.

 Pada Tahun 2005 (VB 8.0), Visual Basic 2005 yang merupakan lanjutan dari Visual
Basic .NET.

 Edit & Continue , pada Visual Basic 2005 kita boleh melakukan perubahan kode.

 Perbaikan Konversi dari Visual Basic ke Visual Basic NET 12.

 Is Not Patent, konversi If Not X Is Y menjadi If X IsNot Y dari Visual Basic 2005.

 Visual Basic 2005 Express, untuk pemula dan yg gemar dengan VB.

 Visual Basic “Orcas” (VB 9.0) , pada tahun 2007 dengan penambahan fitur – fitur.

 Visual Basic ‘VBx’ (VB 10.0), menawarkan dukungan untuk Dynamic Language
Runtime.

2) Macam-macam bahasa pemrograman

 Bahasa C

Kelebihannya yaitu hanya tersedia sedikit kata kuncinya, ada hampir diseluruh komputer,
kode bahasa C sifatnya portable, proses executable program bahasa C lebih cepat, lebih
terstruktur.

Kekurangannya yaitu membingungkan pemakai karena banyaknya operator serta fleksibilitas

penulisan program.

 Bahasa C++

Kelebihannya yaitu semua kelebihan dari C dengan tambahan penanganan kompleksitas

dengan OOP yang utama.

Kekurangannya yaitu kurangnya library built in, bahasa C++ masih kurang terkenal karena
kita dari sisi mesin dibanding memikirkan probis yang seharusnya menjadi tujuan.
  Bahasa Java

Kelebihannya yaitu bahasa sederhana, berorientasi objek, ampuh dan aman.

Kekurangannya yaitu kecepatanya kurang jika dibandingkan dengan bahasa C++, program
yang dibuat lebih lambat jika dibandingkan dengan program bahasa lain.

 Bahasa Visual Basic

Kelebihannya yaitu perintah-perintahnya sangat komplit, mudah dalam pembuatan program

tanpa harus mengetik bahasa program lagi, tetapi cukup mendesign tampilan dengan VB
editor.

Kekurangannya yaitu tidak mempunyai database sendiri, tidak mempunyai pendukung untuk
membuat report dari bawaan VB sendiri.

3) Macam tipe data terdiri dari :

A. Tipe Data Sederhana (Simple Data)

 Chart/Varchar : Penghimpun data yang berupa aalfabetic misalnya seperti : nama

 Numeric : Penghimpunan data berupa bilangan real misalnya 2,35

 Integer : Penghimpunan data berupa angka misalnya nomor KTP, NIP

 Date : Penghimpunan data berupa tanggal, bulan & tahun misalnya tanggal
lahir

 Desimal : Penghimpunan data berupa pecahan seperti 1,11

 Text : Penghimpunan data berupa semua tipe data seperti huruf, symbol
baca.

B. Tipe Data Terstruktur

 Record : Himpunan data yang terdiri dari beberapa karakter yang berbeda –
beda.
 Set : Tipe data yang memuat sejumlah elemen dengan tipe data dasar sama.
  Array : Tipe yang berisi beberapa data yang ditampung dalam variabel
dengan tipe data yang sama.

C. Tipe Pointer

Merupakan petunjuk yang berisi alamat memori dimana data disimpan.

IDE dalam Visual Basic 2010 dan macam-macam jenisnya

IDE (Integrated Developement Environment) merupakan sebuah “layanan satu pintu” yang
bisa digunakan oleh programmer untuk melakukan, desain, coding, debugging, dan kompilasi
program dalam sebuah tool yang terintegrasi.

Macam – macam jenisnya terdiri dari :

 Menu bar, dipakai dalam memilih tugas-tugas tertentu seperti membuka project,
yang terdiri dari menu file, edit, view.
 Main toolbar, shortcut untuk menu yang sering dipakai pada menu bar.

 Project, window berisi struktur tree dari project yang lagi dikerjakan.

 Form designer, window untuk merancang user interface dari aplikasi.

 Toolbox, window yang berisi komponen-komponen yang digunakan untuk

memperkaya user interface.

 Code, untuk menuliskan source code dari program.

 Properties, untuk melihat / mengedit sifat dari object yang sedang dipilih.

 Color palette, untuk mengubah warna dari suatu object.

 Form layout, menunjukan tampilan form bersangkutan disaat runtime.

5) 10 macam komponen toolbox yaitu:

a. Pointer , arah penunjuk untuk memilih komponen control yang terpasang di form.
b. Picture Box, Merupakan tool untuk menampilkan gambar pada visual basic.
 c. Label, tool yang digunakan untuk membuat teks. User tidak bisa mengubah – ubah
label.
d. CheckBox, tool yang digunakan untuk control pilihan dengan ketentuan control
terpilih jika diklik user. Checkbox dapat dipilih 1 atau lebih.
e. Combo BOX, untuk pembuatan control kombinasi Textbook dan Listbox.
f. HScrollBar, merupakan alat yang membuat scrollbar menjadi horizontal.
g. Timer, Tool untuk pengukuran waktu
h. DirListBox, untuk menampilkan folder atau direktori.
i. OLE, menghubungkan ke form dari software lain
j. Shape, untuk pembuatan bentuk –bentuk seperti lingkaran, kotak maupun persegi
panjang.
k. Event Driven Programming merupakan suatu kode dalam program yang tidak sesuai
alur tetapan awal eksekusi program dapat berlainan dari event yang ada.

 Debugging merupakan proses yang digunakan untuk menemukan serta mengurangi

jumlah bug / cacat dari program maupun perangkat keras, sehingga dapat berperilaku
sesuai dengan harapan.
 Source Code merupakan gabungan dari deklarasi bahasa pemrograman computer
yang dapat digunakan untuk komunikasi, dibaca dan ditulis oleh manusia.
 Visual Component Library merupakan pengembangan aplikasi yang digunakan
dengan platform windows.
 Variabel, berupa nama yang diperintah untuk computer yang mengambil data dari
memori tersimpan.

TUGAS KELOMPOK

Program pembelian barang di toko meubel

DEKLARASI

jenis_barang :string

jumlah_barang :integer

n :integer

ALGORITMA

begin
read(jenis_barang)

case jenis_barang

‘kursi’ : n = 350.000

‘meja’ : n = 240.000

‘lemari’ : n = 500.000

endcase

read(n)

totalbayar = n * jumlah_barang

write (‘jadi total bayar = ‘); read (totalbayar)

end

LISTING ;

Private Sub Form1_Load(By valsender [Link], ByVale As [Link])

Handles [Link]

With ComboBox1

.[Link](“kursi”)

.[Link](“meja”)

.[Link](“lemari”)

End With

End Sub

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender [Link], ByVal e

[Link]) Handles [Link]()
End Sub

Private Sub Button_1Click(ByVal sender As [Link], ByVal sender [Link],

ByVale [Link]) Handles [Link]

Dim harga As Integer

Dim jumlah As Integer

If [Link] = “kursi” then

a = 350000

elseif [Link] = “meja” then

a = 240000

else

a = 500000

endif

endif

total = (a * TextBox2)

[Link] = Format(total, “#,#”)

End Sub

Private Sub Button2_Click(ByVal sender [Link], ByVal e [Link])

Handles [Link]

Close()

End Sub
Contoh Login [Link] 2010 menggunakan DATABASE ACCESS

By Muhammad Zaky Maulani | Kamis, 20 Oktober 2011

Sebelum Membaca, Ayo Berbagi :

Untuk Memulai membuat contoh login [Link] 2010 tidak menngunakan database dan di isi langsung
di dalam fromnya, kita mulai saja :

1. Buat Dulu From untuk loading, loading ini tujuannya ketika kita masuk maka muncul dulu
loading,seperti gambar ini ....

jangan lupa di dalam form loading masukan timer dan progresbarr ....

untuk source di dalam timer....

Private Sub Timer1_Tick(ByVal sender As [Link], ByVal e As [Link]) Handles

[Link]
Dim Frm_Log As New F_Login
[Link] += 4
If [Link] >= 100 Then
[Link]()
MsgBox("Loading Sukses", [Link])
Frm_Log.Show()
[Link]()
End If
End Sub

untuk source form loadnya ...

Private Sub Loading_Load(ByVal sender As [Link], ByVal e As [Link]) Handles

[Link]
[Link]()

End Sub

2. Buat From ke dua, jika kamu tidak tahu cara membuat from ke dua, nih!! saya kasih tau caranya...
biar langsung saja tekan CTRL + SHIFT + A . maka akan muncul

setelah itu pilih windows from.

3. buat class sama module nya, caranya sama seperti no 2 ...

4. di class ketik source di bawah ...!!!

Imports [Link]
Imports [Link]

Namespace CLS
Public Class clsDataConnetion
Dim Connect As New _
OleDbConnection("Provider=[Link].4.0;Persist " _
& "Security Info=False;Data Source=[Link]")

Public Function Open() As OleDbConnection

[Link]()
Return Connect
End Function

Public Function Close() As OleDbConnection

[Link]()
Return Connect
End Function
End Class
End Namespace
5. di dalam module ketik sorce di bawah ini ...

Imports [Link]

Module mdlDeclarasi
'Kumpulan Keklarasi Public fungsi
Public objCommand As OleDbCommand
Public objDataAdapter As OleDbDataAdapter
Public objDataReader As OleDbDataReader
Public StrSql As String
Public objDataSet As New DataSet
Public objDataTable As New DataTable
End Module

6. Buat dalam from ke dua ini tampilan login seperti di bawah ini ..

7. di tombol login ketik source di bawah ini...

Imports [Link]

'===================================
'Sumber [Link]
'===================================

Public Class F_Login

 Dim Myconnection As New [Link]
Dim Nama As String
Dim Password As String

Sub CekUser()
'=============================================================
'Fungsi untuk mengecek nama user apakah ada pada database table record user
'yang dimana nama username = [Link]
[Link]()
StrSql = ("select * from [DtLogin] where [Nama_User] = " _
& "'" & Trim(txtNama_User.Text) & "'")
objCommand = New OleDbCommand
[Link] = [Link]
[Link] = [Link]
[Link] = StrSql
objDataAdapter = New OleDbDataAdapter(objCommand)
[Link](objDataSet, "Mdt_Nama_User")
objDataTable = [Link]("Mdt_Nama_User")
[Link]()
'=============================================================
End Sub

Sub CekPassword()
'=============================================================
'Fungsi mencari nilai value password & Level
objCommand = [Link]
[Link] = ("select [Nama_User],[Password] " _
& " from [DtLogin] where [Nama_User]='" & Trim(txtNama_User.Text) & "'")
objDataReader = [Link]
[Link]()
Nama = [Link]("Nama_User") 'Mendefinisikan Id = Id yang ada pada database
Password = [Link]("Password") 'Mendefinisikan Password = password yang ada
pada database
[Link]()
'=============================================================
End Sub
Private Sub Button1_Click(ByVal sender As [Link], ByVal e As [Link]) Handles
[Link]
Dim Frm_Menu As New F_Menu

If txtNama_User.Text = "" Or [Link] = "" Then

[Link]("Maaf Data Login Belum Lengkap..", "DATA LOGIN",
[Link], [Link])
txtNama_User.Text = ""
[Link] = ""
 txtNama_User.Focus()
Else

Call CekUser()
If [Link] <= 0 Then
[Link]("Maaf Nama User Tidak Terdaftar..", "ID TIDAK TERDAFTAR",
[Link], [Link])
txtNama_User.Text = ""
[Link] = ""
txtNama_User.Focus()

Else

Call CekPassword()
If Password <> Trim([Link]) Then
[Link]("Password Salah", "SALAH PASSWORD", [Link],
[Link])
[Link] = ""
[Link]()

Else

'[Link]()
Frm_Menu.[Link] = "Selamat anda berhasil login"
Frm_Menu.ShowDialog()
[Link]()
End If
End If
End If
End Sub

Private Sub Button2_Click(ByVal sender As [Link], ByVal e As [Link]) Handles

[Link]
[Link]()

End Sub
End Class

6. buat lagi from ketiga , caranya sama kayak yang di atas.. contoh tampilan MENU...
7. Coba di RUN F5 ....

jika ada yang mau yang lebih cepatnya atau contoh login yang sudah saya buat silahkan dowload aja

langsung Klik Disini

password-nya : [Link]

maff ini hanya bisa di gunakan di [Link] 2010 ... jika kamu programnya mau bisa di jalankan instal
dulu [Link] 2010 nya .. :D hehehe .. cari sendiri iaa [Link] 2010 nya bagi yang belum punya .. hhehe