Visual Basic Tips

指定秒の待機

アプリケーションを作っていて、ある処理をしたら暫く待ちたい時があります。以前は（VB2.0）Do〜Loopでやっていましたが、これだとCPUの使用率が100%になってしまい上手くありません。Sleep関数を使うとこの問題がクリアされます。

Private Sub Form_Load()
　　Sleep (5000)　'5秒待ちます。
End Sub


'-------------------------------------------------------------
'
'-------------------------------------------------------------
Declare Sub Sleep Lib "KERNEL32" (ByVal dwMilliseconds As Long)


DownLoad vbtips011.lzh 2KB (VB6.0)