Lha itu sudah bisa, good work brooo...
>
> Saya udah coba fungsi delay kaya gini
>
> Private Declare Function GetTickCount Lib "kernel32" () As Long
> Public Sub Delay(detik As Long)
> Dim TimeOut As Long
> TimeOut = (GetTickCount / 1000) + detik
> Do
> DoEvents
> Loop Until TimeOut < (GetTickCount / 1000)
> End Sub
>
> Belum ada masalah sih. Anyway makasih banget bwt semua yang udah
kasih masukan maaf klo kebanyakan nanya maklum masih tahap belajar.
Tapi klo ada masukan lagi ma source yang saya pake masukannya sangat
saya harapkan . Thx b4
> aries <[EMAIL PROTECTED]> wrote: coba
