VB6.0隐藏鼠标

时间:2026-02-14 23:22:32

1、新建一个EXE工程

VB6.0隐藏鼠标

2、打开API文本浏览器:Windows开始→Mcrosoft Visual Basic 6.0中文版→Mcrosoft Visual Basic 6.0中文版工具→API文本浏览器

VB6.0隐藏鼠标

3、在API文本浏览器选择菜单“文件”→加载文本文件,在打开的文件窗口中选择“WIN32API.txt”

VB6.0隐藏鼠标

VB6.0隐藏鼠标

4、在“键入您要查找的内容的开头几个字母:”下的文本框键入“ShowCursor”并选择右侧“声明范围”中的“私有”。点击“添加”,在“选定项”下方的文本框中将出现声明内容。点击“复制”,将声明内容复制。并将声明内容粘贴到VB6.0代码窗口的“通用-声明”处。

VB6.0隐藏鼠标

5、设置Form1属性。KeyPreview让窗体可以接受键盘动作,WindowState使窗体最大化。

VB6.0隐藏鼠标

6、在代码窗口输入以下内容:

Private Sub Form_Click()

    ShowCursor 0   '隐藏鼠标

End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)   

If KeyCode = 65 Then

        ShowCursor 1   ‘显示鼠标

End If

End Sub

点击窗口时鼠标隐藏。

摁下“A”键鼠标显示。

VB6.0隐藏鼠标

© 2026 一点资料
信息来自网络 所有数据仅供参考
有疑问请联系站长 site.kefu@gmail.com