Sleep Function by VB6 & C++

This is for VB6

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

Private Sub Command1_Click()
MsgBox "begin"
Sleep 1000
MsgBox "end"
End Sub


If for C++
Just write this without any declaration

Sleep(1000)

p/s: wah, very simple right?