Sampai sejauh ini kita menggunakan perintah
MsgBox untuk menampilkan suatu kotak pesan pada layar. Ini adalah pemakaian utamanya. Namun demikian kita bisa berbuat lebih banyak lagi dengan
MsgBox karena ternyata perintah ini bisa menampilkan beberapa kombinasi tombol yang berbeda. Jika anda tidak mengatakan tombol manakah yang akan digunakan, maka tombol yang dipakai adalah tombol OK. Berikut tabel yang menunjukkan kombinasi tombol yang berbeda-beda pada perintah
MsgBox.
Tombol | Konstanta |
OK | vbOK |
OK, Cancel | vbOKCancel |
Abort, Retry, Ignore | vbAbortRetryIgnore |
Yes, No, Cancel | vbYesNoCancel |
Yes, No | vbYesNo |
Retry, Cancel | vbRetryCancel |
Sebagai contoh, kita dapat menggunakan
MsgBox untuk mengkonfirmasi suatu masukan yang diberikan oleh pengguna. Misalnya menanyakan apakah peserta sudah yakin dengan pilihannya dalam menjawab soal.
- Mula-mula kita siapkan dulu subroutine untuk apabila pengguna memilih item jawaban benar, dan subroutine untuk apabila pengguna memilih item jawaban salah ketika menjawab soal. Sebut saja kedua subroutine itu sebagai JawabBenar dan JawabSalah.
|
Mendefinisikan Dua Subroutine Baru |
- Kemudian, didalam setiap subroutine tersebut diatas kita masukkan message box untuk mengkonfirmasi jawaban yang telah diberikan. Untuk keperluan ini kita memakai message box dengan tombol Yes dan No.
|
Kode untuk Message Box dengan Tombol Yes-No |
Sekarang, kedua subroutine diatas dapat disisipkan kedalam obyek-obyek pada slide. Pada contoh dibawah, subroutine
JawabBenar disisipkan kedalam obyek E, sedangkan subroutine
JawabSalah disisipkan ke obyek A, B, C dan D. (Baca kembali tulisan saya mengenai cara menyisipkan macro kedalam sebuah obyek
disini).
Contoh hasilnya seperti berikut:
Tapi permasalahan belum selesai disini, karena kita perlu tindak lanjut atas konfirmasi yang diberikan oleh pengguna melalui message box diatas.
Bersambung . . .
Komentar