如何将VB做出的程序界面上的鼠标指针去掉?
我需要将界面上的指针去掉~高手帮个忙~谢谢~我做的这个程序是全屏的,但鼠标的指针影响程序效果~所以想把那个指针去掉~怎么弄?或者代码怎么写?怎么加?在哪里加?...
我需要将界面上的指针去掉~
高手帮个忙~
谢谢~
我做的这个程序是全屏的,但鼠标的指针影响程序效果~所以想把那个指针去掉~
怎么弄?或者代码怎么写?
怎么加?在哪里加? 展开
高手帮个忙~
谢谢~
我做的这个程序是全屏的,但鼠标的指针影响程序效果~所以想把那个指针去掉~
怎么弄?或者代码怎么写?
怎么加?在哪里加? 展开
展开全部
mouse.hide?你们的VB版本是什么呀?VB6是没的.用API吧.
----------------------------------------------------
Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Private Sub Form_Load()
ShowCursor 0
End Sub
Private Sub Form_Unload(Cancel As Integer)
ShowCursor 1
End Sub
--------------------------------------------
注意:windows维持着一个内部显示计数;倘若bShow为TRUE,那么每调用一次这个函数,计数就会递增1;反之,如bShow为FALSE,则计数递减1。只有在这个计数大于或等于0的情况下,指针才会显示出来.
还有.,,在卸载事件里写ShowCursor 1是必要的.如果你不写.呵呵.后果自负..
----------------------------------------------------
Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Private Sub Form_Load()
ShowCursor 0
End Sub
Private Sub Form_Unload(Cancel As Integer)
ShowCursor 1
End Sub
--------------------------------------------
注意:windows维持着一个内部显示计数;倘若bShow为TRUE,那么每调用一次这个函数,计数就会递增1;反之,如bShow为FALSE,则计数递减1。只有在这个计数大于或等于0的情况下,指针才会显示出来.
还有.,,在卸载事件里写ShowCursor 1是必要的.如果你不写.呵呵.后果自负..
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
随便找个图标工具,做一个空白图标,然后把VB窗体的MouseIcon设置成它,并把MousePointer设为99
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
加个命令就行了
mouse.hide
mouse.hide
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用 mouse.hide 语句
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询