Materi Ajar VB6 - Input & Output
ALGORITMA & PEMROGRAMAN

Input & Output di Visual Basic 6.0

Panduan langkah demi langkah membuat form sederhana untuk menghitung total harga menggunakan komponen Input & Output di VB6.

Progres Langkah 0 / 5 langkah
1

Masukkan 3 Label ke Form

Komponen label untuk menampilkan teks statis

Dari Toolbox, drag komponen Label sebanyak 3 buah ke form. Kemudian ubah property Caption masing-masing:

Label1 "Harga Satuan"
Label2 "Jumlah Barang"
Label3 "Total Harga"
Properties - Label1
×
(Name) Label1
Caption Harga Satuan
Font MS Sans Serif
2

Masukkan 3 TextBox

Komponen TextBox untuk input dan output data

Drag komponen TextBox sebanyak 3 buah ke form. Letakkan di sebelah kanan masing-masing Label. Ubah property (Name):

Text1 TxtHarga
Text2 TxtJumlah
Text3 TxtTotal
��� Tips: Ubah property (Name), bukan Caption. Name digunakan untuk memanggil TextBox di kode program.
Properties - Text1
×
(Name) TxtHarga
Text
3

Masukkan 2 Command Button

Tombol untuk menjalankan aksi (Proses & Keluar)

Drag komponen CommandButton sebanyak 2 buah ke form. Ubah property Caption:

Command1 Caption → "Proses"
Command2 Caption → "Keluar"
Proses
Keluar
4

Tampilan Form Akhir

Begini tampilan form yang sudah jadi

Form1
_□×
Harga Satuan
_ TxtHarga
Jumlah Barang
_ TxtJumlah
Total Harga
_ TxtTotal ← Output
Proses Command1
Keluar Command2
🎯 Pastikan posisi Label sejajar dengan TextBox di sebelah kanannya. Tombol ditempatkan di bagian bawah form.
5

Tulis Kode & Uji Aplikasi

Menghubungkan tombol dengan aksi menggunakan kode VB6

1

Double klik tombol "Proses", lalu ketik kode berikut:

Command1_Click() 
Private Sub Command1_Click()
  TxtTotal.Text = Val(TxtHarga.Text) * Val(TxtJumlah.Text)
End Sub
Penjelasan: Fungsi Val() mengubah teks menjadi angka. Hasil perkalian Harga × Jumlah ditampilkan di TxtTotal.
2

Double klik tombol "Keluar", lalu ketik kode berikut:

Command2_Click() 
Private Sub Command2_Click()
  Unload Me
End Sub
Penjelasan: Unload Me menutup form yang sedang aktif.

🧪 Langkah Pengujian:

  1. 1 Tekan F5 atau klik menu Run → Start untuk menjalankan form.
  2. 2 Masukkan angka di TxtHarga (contoh: 25000).
  3. 3 Masukkan angka di TxtJumlah (contoh: 4).
  4. 4 Klik tombol "Proses" → Hasil muncul di TxtTotal (100000).
  5. 5 Klik tombol "Keluar" → Form menutup.