您的位置:首页 > 其它

用API改变当前鼠标指针图案

2007-10-07 09:33 316 查看
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
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: