vb编程:锁定鼠标光标位置

 时间:2025-01-09 18:25:37

1、启动【vs2010】,新建一个【vb】窗口项目。

2、编辑代码:=============================================Public Class Form1 Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Integer Public Declare Sub ExitProcess Lib "kernel32" Alias "ExitProcess" (ByVal uExitCode As Long) Public Declare Function SetCursorPos Lib "user32" (ByVal Z As Integer, ByRef X As Integer) As Integer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 时钟.Start() End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 时钟.Tick If GetAsyncKeyState(112) = -32767 Then ExitProcess(0) End If SetCursorPos(100, 100) End SubEnd Class============================================ps:尽量自己手打一遍,加深印象。

vb编程:锁定鼠标光标位置vb编程:锁定鼠标光标位置

4、代码解析:If GetAsyncKeyState(112) = -32767 Then ExitProcess(0) End If SetCursorPos(100, 100)’112整数值代表”键F1“’-32767则是进制转换过来的值,F1被按下时,函数的返回值’翻译:如果函数GetAsyncKeyState返回值为-32767,则调用函数ExitProcess结束自身进程,反之调用函数SetCursorPos锁定鼠标光标横纵位置(100,100)

5、运行后大图。ps:我在窗口上加了个标签,可有可无。

vb编程:锁定鼠标光标位置vb编程:锁定鼠标光标位置
  • 如何下载崩坏3?
  • vs2013出现应用程序中的服务器错误解决方法
  • 如何禁止网易云音乐在添加歌单后上传到云盘?
  • 三国杀中如何得知界周瑜“平虏伯”的战功
  • 英魂之刃出装、打法攻略系列1之玉兔
  • 热门搜索
    旅游签证办理流程 白银旅游 河南 旅游 广州旅游景点大全介绍 旅游的说说心情朋友圈 旅游购物 端午节旅游攻略 安徽旅游政务网 九寨沟旅游最佳时间 马德里旅游