鼠标指针代码（鼠标指针表示）

鼠标指针代码

PrivateDeclareFunctionalxSetCursorLib\"user32\"Alias\"SetCursor\"(ByValhCursorAsLong)AsLong

@#将指定的鼠标指针设为当前指针

PrivateDeclareFunctionalxGetCursorLib\"user32\"Alias\"GetCursor\"()AsLong

@#获取目前选择的鼠标指针的句柄

PrivateSubMouseType()

@#取得左右形光标的值

Screen.MousePointer=9@#设屏幕鼠标为9（左右型鼠标）。

lngMouseOne=alxGetCursor()@#返回左右型鼠标在WINDOWS(2000\\98\\XP)的值。

Screen.MousePointer=7@#设屏幕鼠标为11（沙漏）。

lngMouseTwo=alxGetCursor()@#返回左右型鼠标在WINDOWS(2000\\98\\XP)的值。

Screen.MousePointer=0@#重设屏幕鼠标为0（ACCESS自确定）。

blTextout=False

blTextlook=False

EndSub

方法二：

随便找一个.cur文件copy到mdb文件相同的目录

PrivateDeclareFunctionCopyCursorLib\"user32\"Alias\"CopyIcon\"(ByValhcurAsLong)AsLong

PrivateDeclareFunctionLoadCursorFromFileLib\"user32\"Alias\"LoadCursorFromFileA\"(ByVallpstrCurFileAsString)AsLong

PrivateDeclareFunctionGetCursorLib\"user32\"()AsLong

PrivateDeclareFunctionSetSystemCursorLib\"user32\"(ByValhcurAsLong,ByValidAsLong)AsLong

PrivateConstOCR_NORMAL=32512

DimlngMyCursorAsLong

DimlngSystemCursorAsLong

PrivateSubcmdMyCursor_Click()@#更改指针样式

DimstrCurFileAsString

strCurFile=CurrentProject.Path+\"\\Cursor.cur\"

@#可随意调用其他的.cur鼠标样式文件，以达到显示各种指针的目的

lngMyCursor=LoadCursorFromFile(strCurFile)

lngSystemCursor=GetCursor()

lngSystemCursor=CopyCursor(lngSystemCursor)

SetSystemCursorlngMyCursor,OCR_NORMAL

Text1.SetFocus

Text1.Text=\"鼠标指针已经设定为您要的状态\"

cmdMyCursor.Enabled=False

cmdSystemCursor.Enabled=True

EndSub

PrivateSubcmdSystemCursor_Click()@#恢复系统指针样式

SetSystemCursorlngSystemCursor,OCR_NORMAL

Text1.SetFocus

Text1.Text=\"鼠标指针已经恢复为系统状态\"

cmdMyCursor.Enabled=True

cmdSystemCursor.Enabled=False

lngSystemCursor=0

EndSub

PrivateSubForm_Close()

IflngSystemCursor0ThenSetSystemCursorlngSystemCursor,OCR_NORMAL

EndSub

PrivateSubForm_Unload(CancelAsInteger)

IflngSystemCursor0ThenSetSystemCursorlngSystemCursor,OCR_NORMAL

EndSub

求鼠标指针的代码

要在网页中加入别具风格的鼠标只要加入如下代码就行了

BODY style='cursor:url()'

其中兰色的是鼠标文件地址，你可以替换成你喜欢的文件，下面有许多供你选择（同时欢迎大家将你发现的漂亮的鼠标文件分享给大家）

01 绿色BODY style='cursor:url()'

02 花树枝 BODY style='cursor:url( ... swer_nor.cur)'

03 小点跟随BODY style='cursor:url()'

04 粉红玫瑰BODY style='cursor:url()'

05 钥匙BODY style='cursor:url()'

06 小手BODY style='cursor:url()'

07 短笔BODY style='cursor:url()'

08 太阳花BODY style='cursor:url()'

09 绿色样式剪头BODY style='cursor:url()'

10 小色杆BODY style='cursor:url()'

11 银色样式剪头BODY style='cursor:url()'

12 小老鼠BODY style='cursor:url()'

13 有点像猫BODY style='cursor:url()'

14 美女头像BODY style='cursor:url()'

15 小红鼠BODY style='cursor:url()'

16 小粉猪BODY style='cursor:url()'

17 小美女加小煎头BODY style='cursor:url()'

18 蝴蝶BODY style='cursor:url()'

19 小钟点样式BODY style='cursor:url()'

20 十字BODY style='cursor:url()'

21 样式剪头BODY style='cursor:url()'

22 银杆BODY style='cursor:url()'

23 带头粉红杆BODY style='cursor:url()'

24 两十字BODY style='cursor:url()'

25 兔头BODY style='cursor:url()'

26 螺旋BODY style='cursor:url()'

27 花BODY style='cursor:url()'

28 花BODY style='cursor:url()'

29 动态小鼠BODY style='cursor:url()'

30 尾动灰色BODY style='cursor:url()'

31 三角BODY style='cursor:url()'

32 伞柄BODY style='cursor:url()' ...

各种形状下载地址:

后缀名为**.ico 的为静态

后缀名为**.cur 的为静态

后缀名为**.ani 的为动画

C语言如何实现隐藏鼠标指针求代码

用SendInput函数。第二个参数是一个INPUT结构体的数组，第一个参数代表这个数组有几个元素，最后一个参数代表这个数组中每一个元素是几个字节。#include#pragmacomment(lib,"user32.lib")intmain(){INPUTmouseInput;ZeroMemory(mouseInput,sizeofmouseInput);mouseInput.type=INPUT_MOUSE;mouseInput.mi.dx=10;mouseInput.mi.dy=10;mouseInput.mi.dwFlags=MOUSEEVENTF_MOVE;SendInput(1,mouseInput,sizeof(mouseInput));return0;}以上代码把鼠标往右移动10往下移动10。使用MOUSEEVENTF_ABSOLUTE这个flag可以指定绝对位置，它把屏幕右下角定义为65535,65535把左上角定义为0,0所以#includeintmain(){INPUTmouseInput;ZeroMemory(mouseInput,sizeofmouseInput);mouseInput.type=INPUT_MOUSE;mouseInput.mi.dx=32767;mouseInput.mi.dy=32767;mouseInput.mi.dwFlags=MOUSEEVENTF_MOVE|MOUSEEVENTF_ABSOLUTE;SendInput(1,mouseInput,sizeof(mouseInput));return0;}是移动到屏幕正中央。至于鼠标点击：#includeintmain(){INPUTmouseInput;ZeroMemory(mouseInput,sizeofmouseInput);mouseInput.type=INPUT_MOUSE;mouseInput.mi.dwFlags=MOUSEEVENTF_LEFTDOWN;SendInput(1,mouseInput,sizeof(mouseInput));mouseInput.mi.dwFlags=MOUSEEVENTF_LEFTUP;SendInput(1,mouseInput,sizeof(mouseInput));return0;}就是“按下”再“弹起来”。双击就是来两次，右击就是LEFT改成RIGHT。