Kali ini saya akan memberikan
tutorial langsung tentang bagaimana caranya mengimplementasikan Timer
pada program Visual Basic saya akan sedikit membuat contoh membuat
tampilan pilihan setelah menunggu beberapa detik dah keluar pilihan Yes or No
Timer adalah satu control pada visual
basic yang berfungsi untuk menghitung waktu. saat program dijalankan,
kontrol timer ini tidak akan terlihat dilayar.
■ Membuat Timer
Misalnya anda akan menampilkan pesan setelah 2 detik, maka cara yang digunakan adalah sebagai berikut:
-pilih menu file=>New atau dengan menekan tombol key Ctrl+N untuk membuat proyek baru.
-klik pilihan satndar.EXE, kemudian klik
tombol open, sehingga dilayar form akan terbentuk sebuah kontrol label
dengan nama Label1. lakukan hal yang sama untuk menghasilkan label2.
-lakukan klik ganda pada pada kontrol timer, sehingga dilayar akan terlihat simbol jam.
-atur posisi label sesuai dengan keinginan, misalnya seperti berikut ini:
-ubah properti untuk setiap kontrol tersebut diatas, misalnya seperti erikut ini:
kontrol properti nilai
form nama caption kontrol timer
label nama caption Belajar kontrol timer
label2 nama caption tunggu sejenak perhatikan pesan
Timer interval 2000
hasil dari proses pergantian properti tersebut adalah sebagai berikut:
-klik ganda kontrol timer pada jendela form, kemudian ketik kode program berikut ini:
private sub Timer1_Timer()
pesan =MsgBox(“Terima Kasih apakah Akan Dilanjutkan?”,vbinformation+vbYesNo, ” Perhatian”)
if pesan = vbNo Then
End
Else
MsgBox (“Tunggu Dua Detik Lagi Sabar ya”)
End if
End sub
■ perintah tersebut di atas berfungsi
untuk menampilkan pesan apabila user telah menunggu selama 2 detik
kemudian terlihat kotak pesan untuk meminta respon user dengan pilihan Yes dan No.
apabila user mengklik Yes, maka terlihat pesan Tunggu dua detik lagi, sabar ya..,kemudian klik tombol ok.
namun apabila user mengklik tombol No, maka proses program akan berhenti.
-simpan form dan proyek tersebut diatas dengan nama Lat-Timer.
-jalankan program aplikasi yang anda buat dengan menekan tombol fungsi F5 atau klik tombol pada start pada toolbar standard atau dengan memilih menubar Run=>Start.
selamat mencoba yah gan.
Tidak ada komentar:
Posting Komentar