Akademi Visual Basic 6 Interaktif

Bab 1 — Mengenal IDE VB6

Pahami setiap bagian lingkungan kerja Visual Basic 6

VB6 memakai pendekatan visual: pengguna menyusun antarmuka dengan kontrol, lalu menulis kode pada event tertentu.

Bagian utama IDE

1. Menu Bar
Pusat perintah utama IDE.

2. Toolbar
Perintah cepat saat bekerja.

3. Toolbox
Kumpulan kontrol antarmuka.

4. Form Designer
Tempat menyusun tampilan aplikasi.

5. Project Explorer
Struktur file dalam proyek.

6. Properties Window
Pengaturan objek terpilih.

7. Code Window
Tempat menulis logika program.

8. Immediate Window
Pengujian cepat dan debugging.

Menu Bar

Berisi perintah utama seperti File, Edit, View, Project, Format, Debug, Run, Tools, dan Help.

Alur kerja dasar VB6

Buat Standard EXE Project.

Rancang form dengan kontrol dari Toolbox.

Ubah Name, Caption, dan properti lain.

Klik dua kali kontrol untuk membuat event.

Tulis kode di dalam event procedure.

Tekan F5 atau tombol Run untuk menguji.

Kebiasaan baik: ubah Text1 menjadi txtNama, Command1 menjadi cmdSimpan, dan Label1 menjadi lblHasil.

Bab 2 — Konsep Dasar

Object, property, method, dan event

🧩

Object

Komponen program, misalnya Form, TextBox, Label, dan CommandButton.

⚙️

Property

Karakteristik objek, misalnya Name, Caption, Text, BackColor, Enabled, dan Visible.

🛠️

Method

Tindakan objek, misalnya Show, Hide, Move, SetFocus, dan Refresh.

⚡

Event

Kejadian yang memicu kode, misalnya Click, Load, Change, KeyPress, dan Unload.

Event Click

Private Sub cmdTampil_Click()
lblHasil.Caption = "Halo, " & txtNama.Text
End Sub

Event Form_Load

Private Sub Form_Load()
Me.Caption = "Aplikasi Pertama"
txtNama.Text = ""
End Sub

Bab 3 — Toolbox dan Kontrol

Kontrol yang paling sering digunakan

Label

Menampilkan keterangan. Properti penting: Caption, Font, ForeColor, Alignment.

TextBox

Menerima input. Properti: Text, MaxLength, MultiLine, PasswordChar, Locked.

CommandButton

Menjalankan perintah saat diklik. Properti: Caption, Default, Cancel, Enabled.

CheckBox

Memilih satu atau beberapa pilihan yang berdiri sendiri.

OptionButton

Memilih satu pilihan dari beberapa alternatif dalam satu Frame.

ComboBox

Menampilkan daftar pilihan yang dapat dipilih atau diketik.

ListBox

Menampilkan banyak item dalam daftar.

Timer

Menjalankan kode pada interval tertentu.

Image/PictureBox

Menampilkan gambar dan elemen visual.

Frame

Mengelompokkan kontrol terkait.

Data Control

Kontrol klasik untuk menghubungkan form dengan data.

Menu Editor

Membuat menu File, Edit, Help, dan submenu.

Konvensi penamaan

Kontrol	Prefix	Contoh
Form	frm	frmUtama
Label	lbl	lblHasil
TextBox	txt	txtNama
CommandButton	cmd	cmdSimpan
ComboBox	cbo	cboKelas
ListBox	lst	lstData
CheckBox	chk	chkAktif
OptionButton	opt	optLaki
Timer	tmr	tmrJam

Bab 4 — Variabel dan Tipe Data

Menyimpan data dalam program

Deklarasi variabel

Option Explicit

Dim nama As String
Dim umur As Integer
Dim nilai As Single
Dim total As Currency
Dim aktif As Boolean
Dim tanggalLahir As Date

Gunakan Option Explicit agar semua variabel wajib dideklarasikan.

Tipe data umum

Tipe	Kegunaan	Contoh
String	Teks	"Daniel"
Integer	Bilangan bulat	25
Long	Bilangan bulat besar	100000
Single	Desimal	85.5
Double	Desimal presisi	3.141592
Currency	Keuangan	1500000
Boolean	True/False	True
Date	Tanggal/waktu	#7/25/2026#

Konversi data

CInt(txtUmur.Text)
CLng(txtJumlah.Text)
CSng(txtNilai.Text)
CDbl(txtAngka.Text)
CStr(nilai)
CDate(txtTanggal.Text)

Konstanta

Const KKM As Integer = 75
Const NAMA_APP As String = "Nilai Siswa"

Operator

+ - * /
\ Mod ^
= <> > <
And Or Not
& 'gabung teks

Bab 5 — Percabangan dan Perulangan

Membuat program mengambil keputusan dan mengulang proses

If sederhana

If nilai >= 75 Then
status = "Lulus"
Else
status = "Remedial"
End If

If bertingkat

If nilai >= 90 Then
  grade = "A"
ElseIf nilai >= 80 Then
  grade = "B"
Else
  grade = "C"
End If

Select Case

Select Case nilai
  Case Is >= 90
    grade = "A"
  Case Is >= 80
    grade = "B"
  Case Else
    grade = "C"
End Select

For...Next

For i = 1 To 10
lstHasil.AddItem i
Next i

Step

For i = 10 To 2 Step -2
Debug.Print i
Next i

Do While

Do While i <= 5
Debug.Print i
i = i + 1
Loop

Do Until

Do Until jawaban = "selesai"
jawaban = InputBox("Ketik selesai")
Loop

Bab 6 — Array

Menyimpan banyak data dalam satu variabel

Array tetap

Dim nilai(1 To 5) As Integer
nilai(1) = 80
nilai(2) = 90

Array dinamis

Dim nama() As String
ReDim nama(1 To 10)
ReDim Preserve nama(1 To 20)

Menampilkan

For i = LBound(nilai) To UBound(nilai)
lstNilai.AddItem nilai(i)
Next i

Menjumlahkan

total = 0
For i = LBound(nilai) To UBound(nilai)
total = total + nilai(i)
Next i

Nilai tertinggi

tertinggi = nilai(LBound(nilai))
For i = LBound(nilai) To UBound(nilai)
If nilai(i) > tertinggi Then tertinggi = nilai(i)
Next i

Bab 7 — Sub, Function, dan Module

Membuat kode rapi dan dapat digunakan ulang

Sub Procedure

Private Sub BersihkanForm()
  txtNama.Text = ""
  txtNilai.Text = ""
  txtNama.SetFocus
End Sub

Function

Private Function HitungLuas(p As Double, l As Double) As Double
HitungLuas = p * l
End Function

Module

Module menyimpan prosedur, fungsi, konstanta, atau variabel global untuk beberapa form.

Public Const NAMA_APP As String = "Aplikasi Siswa"

Bab 8 — Input, Output, dan Validasi

Menerima masukan dan mencegah data salah

MsgBox

MsgBox "Data berhasil disimpan", vbInformation

InputBox

nama = InputBox("Masukkan nama:")

Validasi kosong

If Trim(txtNama.Text) = "" Then
MsgBox "Nama wajib diisi"
Exit Sub
End If

Validasi angka

If Not IsNumeric(txtNilai.Text) Then
MsgBox "Nilai harus angka"
Exit Sub
End If

Konfirmasi keluar

If MsgBox("Keluar?", vbYesNo) = vbYes Then
Unload Me
End If

KeyPress angka

If KeyAscii <> 8 And (KeyAscii < 48 Or KeyAscii > 57) Then KeyAscii = 0

Bab 9 — Database Sederhana

Menghubungkan aplikasi VB6 dengan data

Pahami koneksi ADO, query SQL, recordset, dan operasi CRUD.

Alur database

Form→ADO Connection→SQL→Recordset→Tampilan

Tambahkan referensi Microsoft ActiveX Data Objects.

Buat Connection dan Recordset.

Buka koneksi database.

Jalankan SELECT, INSERT, UPDATE, atau DELETE.

Tutup koneksi setelah selesai.

Koneksi ADO

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset

Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb"

Set rs = New ADODB.Recordset
rs.Open "SELECT * FROM siswa", conn

INSERT

conn.Execute "INSERT INTO siswa(nama,nilai) VALUES (...)"

UPDATE

conn.Execute "UPDATE siswa SET nama=... WHERE id=..."

DELETE

conn.Execute "DELETE FROM siswa WHERE id=..."

Keamanan: pada aplikasi nyata gunakan parameter atau pendekatan aman agar input pengguna tidak langsung digabungkan ke query.

Bab 10 — Debugging

Menemukan kesalahan dan menangani error

Breakpoint

Tekan F9 untuk menghentikan program pada baris tertentu.

Step Into

Tekan F8 untuk menjalankan kode satu baris demi satu baris.

Debug.Print

Debug.Print nilai
Debug.Print txtNama.Text

Watch Window

Memantau nilai variabel selama program berjalan.

Immediate Window

Menguji ekspresi dan perintah sederhana.

On Error

On Error GoTo TanganiError
'kode utama
Exit Sub
TanganiError:
MsgBox Err.Description

Bab 11 — Laboratorium VB6

Simulasi logika dan kode

Pilih program, masukkan data, lalu lihat contoh kode dan hasilnya.

Pengaturan

Jenis programInput pertamaInput keduaInput ketiga

Konsep:

Program sapaan memakai TextBox, CommandButton, Label, dan event Click.

Code Window - Form1VB6 Simulator

Hasil simulasi akan tampil di sini.

Bab 12 — Proyek Latihan

Dari pemula sampai aplikasi data

Pemula

Aplikasi Sapaan

Input nama, tombol proses, dan label hasil.

Pemula

Kalkulator

Tambah, kurang, kali, dan bagi.

Pemula

Konversi Suhu

Celcius dan Fahrenheit.

Menengah

Penilaian Siswa

Rata-rata, grade, dan ketuntasan.

Menengah

Kasir Sederhana

Subtotal, diskon, total, dan kembalian.

Menengah

Agenda Harian

Tambah dan hapus agenda pada ListBox.

Lanjutan

Data Siswa

CRUD dan database Access.

Lanjutan

Login

Username, password, role, dan navigasi form.

Lanjutan

Inventaris

Stok masuk, stok keluar, dan laporan.

Bab 13 — Praktik Baik

Membuat proyek lebih rapi

Hindari

Membiarkan nama Text1 dan Command1.
Menulis seluruh kode dalam satu event.
Tidak memeriksa input kosong.
Menggunakan Variant untuk semua data.
Mengabaikan error handling.
Menyimpan password dalam teks biasa.

Bab 14 — Evaluasi

Kuis Visual Basic 6 interaktif

30 soal. Nilai minimal 75%.

🏆

VB6 mengajarkan dasar logika aplikasi desktop

Mulailah dari form sederhana, pahami event, tulis logika yang rapi, validasi input, lalu kembangkan ke aplikasi data.

Kembali ke Atas