CARA MEMBUAT PROGRAM APLIKASI DALAM SEBUAH TOKO

LANGKAH PERTAMA seperti biasa buka terlebih dulu VB 6.0

SELANJUTNYA desain sesuai dengan kebutuhan, contohnya seperti gambar ini
 

LANJUT kodenya seperti ini

KODE TOMBOL PROGRAM HITUNG
Private Sub cmdhitung_Click()
txttotal.Text = Val(txtjumlahbarang.Text) * Val(txtharga.Text) - Val(txtdiskon.Text)
End Sub

KODE TOMBOL PROGRAM KELUAR
Private Sub cmdkeluar_Click()
Unload Me
End Sub

KODE TOMBOL PROGRAM BELANJA LAGI
Private Sub cmdlagi_Click()
txtnomor.Text = ""
txtpembeli.Text = ""
txtbarang.Text = ""
txtharga.Text = ""
txtjumlahbarang = ""
txtdiskon = ""
txttotal.Text = ""
txtnomor.SetFocus
End Sub

TERAKHIR... coba jalankan programnya seperti ini

SELALU DIINGAT NAMA KODE TIDAK ADA PATOKAN. PENTING KITA BISA MENGINGATNYA DENGAN MUDAH.. SEMOGA BERMANFAAT