MI-Komputer

Membuat pesan ketika tombol keluar pasti pernah anda alami misalnya, ketika anda sedang bermain GAME ketika di Klik QUIT keluar pesan “Yakin Anda Mau Keluar?”

Kalok bahasa inggrisnya “Yakin Kue Areb Metu?” he…he…

Oke langsung aja …
Ini saya contokkan pembuatan pesan pada tombol keluar
Ketikkan kode berikut pada tombol yang akan diberi Pesan :

Private Sub Command2_Click()
Unload Me
MsgBox "Yakin Anda Mau Keluar ", vbQuestion, "Pesan Iwan Purnama"
End Sub

Selamat Mencoba...
Semoga Tutorial ini bermanfaat.

Selamat datang sebelumnya, kali saya akan posting tentang visual basic yaitu Membuat Tombol keluar di Visual Basic 6.0. Membuat tombol ini merupakan perintah yang paling dasar dari pemprograman di Visual Basic 6.0

hai temen-temen...disini saya akan beritahu cara membuat program penjualan menggunakan visual basic...
disini temen-temen sudah paham kan dengan program visual basic..
ini tampilan form program Visual Basic

ini source codenya..


ub IsianKosong()

txt kdbrg.text=""
txt namabarang.text=""
txt harga.text=""
txt jumlah.text=""
txt total.text= 0

end sub


sub IsianAwal()
  call IsianKosong
text total beli.text= 0

end sub

sub IsianKosong ()
text kdbrg.enabled=false
text nmbrg.enabled=false
text harga.enabled=false
text jumlah.enabled=false
text total.enabled=false
text total beli.enabled=false

end sub

sub IsianHidup ()
text kdbrg.enabled=true
text nmbrg.enabled=true
text harga.enabled=true
text jumlah.enabled=true
text kdbrg.setfocus
end sub


sub Tombol Mati ()
cmd mulai.enabled=false
cmd proses.enabled=false
cmd hapus.enabled=false

end sub


sub TombolMulai ()
call tombolmati
cmd mulai.enabled=true
end sub

sub tombolproses ()
call tombolmati
cmd hapus.enabled=true
end sub

sub tombolhapus ()
call tombolhapus
cmd hapus.enabled=true

end sub