1. 모듈에 다음과 같은 API Function을 선언합니다
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
2. 폼에 하나의 Command Button 을 추가하여 다음과 같이 코딩을 하세요
Private Sub Command1_Click()
' 2 초동안 기다린다
Sleep 2000
MsgBox "2 초가 지나서 보이네"
End Sub
다음검색