Declare Function GetIDsOfNames Lib "msvbvm60.dll" Alias "BASIC_CLASS_GetIDsOfNames" (ByVal ThisInterface As Long, Optional ByVal RIID As Long = &H733AAE58, Optional ByVal VarptrStringMethodNames As Long, Optional ByVal CountNames As Long = 1, Optional ByVal LCID As Long = &H409&, Optional ResultDispID As Integer) As Long

Module ModDef
    Public Declare Function GetTickCount Lib "kernel32.dll" () As UInteger
    Public Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Int32)