vb.net鼠标中键

调用api

在Visual Baisc.net中的声明：

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

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

例：

mouse_event MOUSEEVENTF_LEFTDOWN,10,10,0,0

'在（10,10）模拟鼠标左键按下

VB.NET模拟鼠标问题

Dim postion1 As New Point

'按绝对位置移动鼠标

'所以要进行如上转换

msdn上有 mouse_event 的详解,大致使用如上

VB.net怎样按住鼠标移动无边框窗体

①在mouse事件中实现

实现方式为：

[csharp] view plain copy

Point mouseOff;//鼠标移动位置变量

bool leftFlag;//标签是否为左键

private void groupControl1_MouseUp(object sender, MouseEventArgs e)

{

if (leftFlag)

leftFlag = false;//释放鼠标后标注为false;

}

private void groupControl1_MouseMove(object sender, MouseEventArgs e)

Point mouseSet = Control.MousePosition;

mouseSet.Offset(mouseOff.X, mouseOff.Y); //设置移动后的位置

Location = mouseSet;

private void groupControl1_MouseDown(object sender, MouseEventArgs e)

if (e.Button == MouseButtons.Left)

mouseOff = new Point(-e.X, -e.Y); //得到变量的值

调用前需要添加using System.Runtime.InteropServices;

public static extern bool ReleaseCapture();

public static extern bool SendMessage(IntPtr hwnd, int wMsg, int wParam, int lParam);

ReleaseCapture(); //释放鼠标捕捉

以上就是土嘎嘎小编为大家整理的vb.net鼠标中键相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦！！