Kamis, 30 September 2010
1
[VB] Membuat Fungsi Sleep Sendiri
Terkadang untuk suatu keperluan, kamu harus menghentikan sejenak alur code yang kamu buat dalam beberapa detik.
Dalam kasus ini, kamu bisa menggunakan fungsi API yang yaitu Sleep pada VB, apakah kamu tidak ingin membuatnya sendiri?
Hehehe, aneh ya! sudah disediakan fungsi Sleep, masih tidak puas. Oke, untuk iseng-iseng mari kita buat prosedur yang mirip dengan
fungsi Sleep, tetapi mari kita gunakan waktu dalam detik bukan dalam milidetik seperti fungsi Sleep, tidak terlalu rumit kok.
Source Code:
Dalam kasus ini, kamu bisa menggunakan fungsi API yang yaitu Sleep pada VB, apakah kamu tidak ingin membuatnya sendiri?
Hehehe, aneh ya! sudah disediakan fungsi Sleep, masih tidak puas. Oke, untuk iseng-iseng mari kita buat prosedur yang mirip dengan
fungsi Sleep, tetapi mari kita gunakan waktu dalam detik bukan dalam milidetik seperti fungsi Sleep, tidak terlalu rumit kok.
Delarasi:
1 Form
1 Command Button
Source Code:
Private Sub Command1_Click()
Dim waktu As Integer
'waktu tidur=3 detik
waktu = 3
Ngorok_ZZZ waktu
MsgBox "Bangun!!!, kau telah tidur selama " & waktu & " s"
End Sub
Private Sub Ngorok_ZZZ(ByVal time As Integer)
Dim t As Single
t = Timer
Do Until (Timer - t) >= time
DoEvents
Loop
End Sub
'2010 crowja
Langganan:
Posting Komentar (Atom)
1 Komentar Untuk “[VB] Membuat Fungsi Sleep Sendiri”
Sabtu, 02 November 2013 pukul 19.00.00 WIB
apa fungsi nya sleep itu?gan?
Posting Komentar
Berikan komentar positif tentang artikel yang sederhana ini niscaya sobat akan mendapatkan balasannya. Hehehe