[VB] Sleep Menggunakan VB6

Ada kalanya kita ingin menghentikan alur untuk sementara waktu dalam hitungan detik, menit dll. Di VBS prosedur ini adalah 'Sleep', untuk menggunakannya cukup mudah, metode ini terletak pada objek 'Wscript', jadi:

Wscript.Sleep(waktu)

Dimana argumen waktu adalah waktu dalam satuan milisekon yang kalau tidak3salah 1000ms=1s,he.
Untuk VB6, prosedure Sleep harus dideklarasikan terlebih dahulu:

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Contoh penggunaan:

Private Sub Form_Load()
MsgBox "Tidur ahh!"
Sleep (2000)
MsgBox "ah, udah pagi!"
End Sub

Jangan Lupa Komentar Yaa..