Penulisan rutin kotak pesan:
MsgBox(Propmt[,Parameter][,Judul][,FileHelp,Konteks])
Contoh :
MsgBox "Program Latihan Visual Basic 6.0",
vbOKOnly + 0, "Ulang"
atau
Ulang = MsgBox("Ulang lagi ?", vbOKCancel +
vbCritical, "Ulang")
Ulang = MsgBox("Ulang lagi ?", vbYesNo +
vbCritical, "Ulang")
Parameter MsgBox :
Parameter
|
Nilai
|
Penjelasan
|
vbOKOnly
|
0
|
Menampilkan tombol OK saja
|
vbOKCancel
|
1
|
Menampilkan tombol OK dan Cancel
|
vbAboutRetryIgnore
|
2
|
Menampilkan tombol About, Retry dan Ignore
|
vbYesNoCancel
|
3
|
Menampilkan tombol Yes, No dan Cancel
|
vbYesNo
|
4
|
Menampilkan tombol Yes dan No
|
vbRetryCancel
|
5
|
Menampilkan tombol Retry dan Cancel
|
vbCritical
|
16
|
Menampilkan icon pesan kritis
|
vbQuestion
|
32
|
Menampilkan icon pesan pertaanyaan
|
vbExclamation
|
48
|
Menampilkan icon pesan peringatan
|
vbInformation
|
64
|
Menampilkan icon pesan informasi
|
vbDefaultButton1
|
0
|
Tombol pertama sebagai default
|
vbDefaultButton2
|
256
|
Tombol kedua sebagai default
|
vbDefaultButton3
|
512
|
Tombol ketiga sebagai default
|
vbApplicationModal
|
0
|
Pemakai program harus merespon pesan jika ingin
melanjutkan pekerjaa dengan aplikasi
|
vbSystemModal
|
4096
|
Semua aplikasi yang sedang dijalankan pada system komputer
akan dihentikan sampai pemakai program merespon pesan
|
Pengembalian nilai MsgBox :
Parameter
|
Nilai
|
Tombol yang dipilih
|
vbOk
|
1
|
OK
|
vbCancel
|
2
|
Cancel
|
vbAbort
|
3
|
Abort
|
vbRetry
|
4
|
Retry
|
vbIgnore
|
5
|
Ignore
|
vbYes
|
6
|
Yes
|
vbNo
|
7
|
No
|
Untuk mendownload source code-nya, klik download.
atau
Tidak ada komentar:
Posting Komentar
Pos kan komentar anda !