Option Explicit
Private Declare Function ShowCursor Lib "user32.dll" (ByVal bShow As Long) As Long '隐藏鼠标
Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)
Private Declare Function timeGetTime Lib "winmm.dll" () As Long
'GDI变