登录
首页 » VB源码 » VB.NET 获取全局鼠标坐标范例

VB.NET 获取全局鼠标坐标范例

于 2022-11-10 发布 文件大小:14.62 kB
0 113
下载积分: 2 下载次数: 1

代码说明:

VB.NET 获取全局coordinate鼠标坐标,显示窗体内的XY坐标,窗体外凡是显示屏幕的任意位置都可以显示出坐标,获取全局鼠标坐标,测试截图是获取本窗口外的鼠标坐标,请参见截图效果。随着鼠标移动会显示出各个鼠标坐标点的XY坐标信息。单击窗口的“开始”按钮后,将执行以下代码获取全局坐标:   GetCursorPos(p)   tooltip1.SetToolTip(Me, "当前鼠标位置 X=:" & p.x & "Y=:" & p.y)   tooltip1.Active = True

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • vb.net复制、移动删除及获取文件的各种属性
    vb.net获取TXT文件的各种属性参数,除了复制、移动文件、删除文件外,还可获取到文件的各种属性参数,不过只是针对TXT文本文件,可以获取到以下的参数:文 件 名 、路 径 、文件大小 、创建文件时间、最近访问时间、最近写入时间、是否隐藏文件、是否只读文件、是否系统文件 、是否脱机文件等 。
    2022-01-26 07:50:33下载
    积分:1
  • VB NET写的DVD播放器
    播放器窗口界面中的操作菜单,实现了弹出菜单的功能,把控制菜下的各菜单项添加到弹出式菜单ContextMenuStrip1中。   播放器功能支持DVD格式的视频播放,包括了暂停、播放、停止、弹出等功能。   本播放器程序依赖于AxInterop.MSWEBDVDLib.dll、Interop.MSWEBDVDLib.dll。
    2023-05-18 15:05:03下载
    积分:1
  • vb利用数据窗口辅助录入数据
    vb利用数据窗口辅助录入数据,也就是本程序窗口中,生成了一些数据辅助窗口,可对用户的录入工作提供一些帮助,其实就是一些供用户选择的组件之类的,用户了用户,又提升了数据录入的准确性,在VB6.0中,本源码可顺利编译成功,运行后如示例图所示。
    2023-07-26 19:20:03下载
    积分:1
  • vb.net读取Access数据库数据并生成适时曲线
    vb.net绘制生成曲线,数据从access数据库中读取,然后将数据进行简要处理后,传送给曲线生成函数,生成适时的数据曲线。   请注意:vb.net里PICTURE只支持像素,长度比较大,需要乘除定义精确值,8当余数为1,则刚好够总长度,否则需要判断长度,计算出坐标,画图,如果要设置数值或日期的显示格可以设置Format属性,例如: .Format = "¥0.00"。
    2022-03-21 23:38:41下载
    积分:1
  • vb.net 读取INI文件示例
    vb.net vs2008读取INI文件示例,ini文件名为 Send.ini,代码中包括了一个读ini API函数。   Ini文件说明:   [节名] []中的节名对应此API的第一参数   Name=内容 Name对应此API的第二参数   API的第三参数是没有取到匹配内容时返回的字符串;   API的第四参数是要返回的字符串;   API的第五参数是字符串缓冲的长度,一般255;   API的第六参数是INI文件的路径。
    2022-02-20 08:44:55下载
    积分:1
  • vb RTrim()去除字符串行尾空格
    vb 演示如何去除字符串结尾空格,把输入框中的含有空格的字符串,全部过滤掉空格,这个源码似乎有上结简单了,使用RTrim(),一行代码即可搞定:   Private Sub Command1_Click()    Text2.Text = RTrim(Text1)   End Sub   主要是使用了RTrim()函数,这个函数不只是过滤行尾空格,也会将字符串中间空格过滤掉。
    2022-10-07 20:30:03下载
    积分:1
  • VB6.0 屏幕滚动字幕(文字滚动)
    VB6 屏幕滚动字幕,这个文字滚动区域被控制在屏幕的右下角,由右向左开始滚动,中间的高度可以调节,通过调节Me.Top = Screen.Height - Me.Height - 800参数,来改变文字滚动区域距离屏幕顶部的距离,文字滚动的实现是基于计时器和循环来实现,下面的代码可为你提供本效果的实现思路:   Label1.Caption = "这里定义需要滚动的文字内容: 用VB制作的文字滚动效果!"   Me.Left = Screen.Width   Me.Top = Screen.Height - Me.Height - 800   BeginPath Me.hWnd   SetBkMode Me.hWnd, TRANSPARENT   EndPath Me.hWnd   rgn = PathToRegion(Me.hWnd)   SetWindowRgn Me.hWnd, rgn, True   Timer1.Interval = 200   Timer1.Enabled = True   End Sub   Private Sub Timer1_Timer()    Me.Left = Me.Left - 100    If Me.Left < Label1.Width * (-1) Then    Timer1.Enabled = False    Me.Left = Screen.Width    Timer1.Enabled = True    End If   End Sub
    2022-05-21 14:58:30下载
    积分:1
  • VB 调用API函数设计关于窗体
    VB 调用API函数设计关于窗体,看第一眼,我还以为是调用Windows系统的关于窗口,仔细看,定义了自己的信息,这个例子可看作是VB使用API函数的例子,了解一些用法,关于本例子中的API用法,可看以下代码:   API函数声明:   Private Declare Function ShellAbout Lib "shell32.dll" Alias "ShellAboutA" (ByVal hWnd As Long, ByVal szApp As String, ByVal szOtherStuff As String, ByVal hIcon As Long) As Long   Private Sub Form_Load()    Call ShellAbout(hWnd, "源码素材网", " 欢迎访问网站:http://www.codesc.net!", Me.Icon)   调用了ShellAbout显示信息,更多内容请下载源码。
    2022-01-25 16:50:26下载
    积分:1
  • VB.net 生成条形code128条
    VB.net绘制生成code128条形码的例子,另外还有EAN128、包括了Code128 A/B/C类型的条形码,程序非常好用,在文本框输入规定要求的数据,即时输入,即时生成。程序中为生成条形码,创建了一些函数,比如显示可见条码文字 如果小于40 不显示文字、获取条形码宽和放大系数、获得条码图形、根据编号获得条纹、获取目标对应的数据、偶数检测判断、获取128图形等,在VB.NET生成条形码的朋友,本范例源码是个很好的参考。
    2022-02-14 15:50:30下载
    积分:1
  • VB 写的拼图 用数字代表图片
    VB 写的拼图 用数字代表图片,将数字的顺序排列好,就完成了拼图,比起图片版的拼图,要简单多了。   玩法:将数字1挪动到最开始的位置,如何移动?要把占位的数字一个一个挪开,依次为1、2、3等数字让位,把整体排序好,就拼好了。
    2022-07-23 16:53:18下载
    积分:1
  • 696516资源总数
  • 106914会员总数
  • 0今日下载