网站建设资讯

NEWS

网站建设资讯

vbnet全局鼠标 vb控制鼠标点击

高分求助!vb.net 如何全局判断鼠标是否单击

你这问题说的有点没太明白 是在form上判断是否是鼠标单击么?

创新互联建站专注于企业成都全网营销推广、网站重做改版、友好网站定制设计、自适应品牌网站建设、H5页面制作成都商城网站开发、集团公司官网建设、外贸网站制作、高端网站制作、响应式网页设计等建站业务,价格优惠性价比高,为友好等各大城市提供网站开发制作服务。

还是说在后台判断是否是鼠标单击了

如果是第一种的话应该是有事件的 直接写进去你要写的方法就好了

如果要是在后台判断的话就定义一个全局变量 然后在你from上所有的你需要判断的空间上都加上mouseclick事件中再给全局变量赋值就能判断是否是 鼠标单击了

如何在VB.net中用程序控制鼠标移动和点击

调用api

在Visual Baisc.net中的声明:

Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

Public Const MOUSEEVENTF_LEFTDOWN = H2 '模拟鼠标左键按下

Public Const MOUSEEVENTF_LEFTUP = H4 ’模拟鼠标左键释放

Public Const MOUSEEVENTF_MIDDLEDOWN = H20 '模拟鼠标中间键按下

Public Const MOUSEEVENTF_MIDDLEUP = H40 '模拟鼠标中间键释放

Public Const MOUSEEVENTF_RIGHTDOWN = H8 '模拟鼠标右键按下

Public Const MOUSEEVENTF_RIGHTUP = H10 '模拟鼠标右键释放

Public Const MOUSEEVENTF_MOVE = H1 '模拟鼠标指针移动

例:

mouse_event MOUSEEVENTF_LEFTDOWN,10,10,0,0

'在(10,10)模拟鼠标左键按下

vb.net textbox1.text 鼠标一点 全部选择

Private Sub TextBox1_Click(sender As Object, e As EventArgs) Handles TextBox1.Click

TextBox1.SelectAll()

TextBox1.ForeColor = Color.Blue

End Sub

如果不想每次都这样的话,就加一个if判断TextBox1.ForeColor 是否是Color.Blue就可以了

VB.net鼠标

首先需要一个判断鼠标位置的api,然后单位时间进行判断,如果某时间鼠标的位置超出了窗体,则用另一个api来设置鼠标位置

这个都不难理解?详情可查看vbgood的api手册


当前标题:vbnet全局鼠标 vb控制鼠标点击
网页URL:http://cdweb.net/article/dopcppp.html