Media Ajar Visual Basic 6.0
Informatika • Kelas IX

Pemrograman
Visual Basic 6.0

Program Sederhana

Pengantar

💻

Apa Itu Pemrograman?

Pemrograman adalah proses menulis instruksi atau perintah agar komputer bisa menjalankan tugas tertentu. Bayangkan kamu sedang menulis resep masakan — kamu memberi tahu komputer langkah demi langkah apa yang harus dilakukan!

🖥️

Apa Itu Visual Basic 6.0?

Visual Basic 6.0 (VB6) adalah bahasa pemrograman buatan Microsoft yang bersifat visual — artinya kamu bisa membuat program dengan cara drag & drop komponen seperti tombol, kotak teks, dan label. Sangat cocok untuk pemula!

🚀

Manfaat Belajar Pemrograman

  • ✓ Melatih berpikir logis dan sistematis
  • ✓ Bisa membuat aplikasi sendiri
  • ✓ Membuka peluang karir di dunia teknologi
  • ✓ Membantu menyelesaikan masalah sehari-hari

Tujuan Pembelajaran

Setelah mempelajari materi ini, kamu diharapkan mampu:

1

Memahami Konsep Program Sederhana

Mengerti cara kerja program komputer dan alur pemrograman dasar

2

Membuat Program Perhitungan Sederhana

Mampu menulis kode untuk menghitung luas, suhu, dan total bayar

3

Menggunakan Input dan Output

Memahami cara mengambil input dari TextBox dan menampilkan output pada Label

4

Menggunakan Event Click

Membuat tombol yang menjalankan perintah saat diklik

Materi 1

Menghitung Luas Persegi Panjang

📐 Konsep: Luas persegi panjang = Panjang × Lebar

Kita akan membuat program VB6 dengan TextBox untuk input panjang & lebar, tombol Hitung, dan Label untuk menampilkan hasil.

Kode Program

' Event saat tombol Hitung diklik
Private Sub Command1_Click()
  Dim p As Integer
  Dim l As Integer
  Dim luas As Integer

  p = Val(Text1.Text)
  l = Val(Text2.Text)
  luas = p * l

  Label1.Caption = luas
End Sub

🖱️ Coba Simulasi

📦 Luas Persegi Panjang— □ ✕
Panjang:
Lebar   :
Luas    :50
Materi 2

Konversi Suhu (C → F)

🌡️ Rumus: Fahrenheit = (Celcius × 9/5) + 32

Contoh: 100°C = (100 × 9/5) + 32 = 212°F (titik didih air)

Kode Program

Private Sub Command1_Click()
  Dim c As Double
  Dim f As Double

  c = Val(Text1.Text)
  f = (c * 9 / 5) + 32

  Label1.Caption = f
End Sub

🖱️ Coba Simulasi

🌡️ Konversi Suhu— □ ✕
Celcius:
Fahrenheit:212.0
Materi 3

Program Kasir dengan Diskon & Kembalian

🛒 Konsep:

  • • Subtotal = Harga × Jumlah
  • • Total Diskon = Subtotal × Persen Diskon / 100
  • • Total Bayar = Subtotal - Total Diskon
  • • Kembalian = Uang Dibayar - Total Bayar

Kode Program

Private Sub Command1_Click()
  Dim harga As Integer
  Dim jumlah As Integer
  Dim diskon As Integer
  Dim bayar As Integer
  Dim subtotal As Integer

  harga = Val(Text1.Text)
  jumlah = Val(Text2.Text)
  diskon = Val(Text3.Text)

  subtotal = harga * jumlah
  bayar = subtotal - (subtotal * diskon / 100)

  Label1.Caption = subtotal
  Label2.Caption = bayar
End Sub

🖱️ Coba Simulasi

Form Login VB6
🔐 Login Kasir— □ ✕
Username:
Password :

Latihan & Quiz

Skor: 0/5
🎉

Selamat!

Kamu sudah mempelajari dasar-dasar pemrograman Visual Basic 6.0

📋 Ringkasan Materi

  • ✓ Program Luas Persegi Panjang (Panjang × Lebar)
  • ✓ Program Konversi Suhu (C × 9/5 + 32)
  • ✓ Program Kasir dengan Diskon & Kembalian (Subtotal - Diskon)
  • ✓ Menggunakan TextBox, Label, dan Command Button

"Setiap programmer hebat pernah menjadi pemula. Teruslah berlatih, jangan takut mencoba, dan nikmati proses belajarnya! 🚀"