Public Const HandCursor = 32649& '这个是手型光标
Public Declare Function SetCursor Lib "user32" (ByVal hCursor As Long) As Long
Public Declare Function LoadCursor Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long
sub xxx_mousemove()
SetCursor LoadCursor(0, HandCursor)
end sub
Public Declare Function SetCursor Lib "user32" (ByVal hCursor As Long) As Long
Public Declare Function LoadCursor Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long
sub xxx_mousemove()
SetCursor LoadCursor(0, HandCursor)
end sub