vb.net模拟按键 vbs模拟键盘按键

寻VB.NET下winio(驱动级模拟按键)的键盘使用方法这是不可能完成的任务,.NET平台不存在开发驱动的能力,你要想在驱动层对键盘操作 , 最好使用C,C来实现 , 比较方便 。像现在一些比较出名的网络游戏 , 都是在驱动层进行保护的 。
C#/VB.NET中模拟按键问题...为什么我运行无效??一、模拟键盘操作
以下示例程序当点击button1按钮,模拟键盘在文本框textBox1中作输入操作,详细说明请参看MSDN帮助中的SendKeys类 。
//事件完整代码
private void button1_Click(object sender, System.EventArgs e)
{
this.textBox1.Focus();//先必须让文本框得到焦点,因为焦点在button1上
SendKeys.Send("^a");//Ctrl A
SendKeys.Send("{DEL}");//Delete
SendKeys.Send(" (ec)");//Shift "ec"
SendKeys.Send("{ENTER}");//Enter
SendKeys.Send(" ec");//Shift 'e'+'c'
SendKeys.Send("{ENTER}");//Enter
SendKeys.Send("{h 10}");//"hhhhhhhhhh"
SendKeys.Send("{ENTER}");//Enter
SendKeys.Send("^%{DEL}"); //Alt Ctrl Del
}
二、模拟鼠标操作
以下示例程序当点击DBButton按钮,模拟鼠标双击窗体事件,并将鼠标向左上方移动10*10象素,其它操作类似 。
//引入名字空间
using System.Runtime.InteropServices
//申明
[DllImport("user32")]
private static extern int mouse_event(int dwFlags,int dx,int dy, int cButtons, int dwExtraInfo);
const int MOUSEEVENTF_MOVE = 0x0001;
const int MOUSEEVENTF_LEFTDOWN = 0x0002;
const int MOUSEEVENTF_LEFTUP = 0x0004;
const int MOUSEEVENTF_RIGHTDOWN = 0x0008;
const int MOUSEEVENTF_RIGHTUP = 0x0010;
const int MOUSEEVENTF_MIDDLEDOWN = 0x0020;
const int MOUSEEVENTF_MIDDLEUP = 0x0040;
const int MOUSEEVENTF_ABSOLUTE = 0x8000;
//事件完整代码
private void Form_DoubleClick(object sender, System.EventArgs e)
{
MessageBox.Show("你双击了屏幕");
}
private void DBButton_Click(object sender, System.EventArgs e)
{
mouse_event(MOUSEEVENTF_MOVE,-10,-10,0,0); //移动鼠标,否则事件发生在按钮上
Down,Up合为一次单击事件
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
}
用vb或c#或vb.net 找到当前打开的浏览器窗口并模拟点击网页按钮一般情况下都是自己开发一个浏览器的 。
有个工具叫做spy,用于抓窗口和句柄 , 不过所用语言是c,木有关系,c#可以调用c。
vb.net怎么无限循环模拟按键要求不多的话 , 完全可以用按键精灵的,你用vb.net去实现的话,反而啰嗦了 。。。
vs2012 vb.net 模拟网页按钮点击使用webbrowser空间实现很简单
一 。首先在窗体头部定义Dim WithEvents MyDomAs MSHTML.HTMLDocument
其次找到element对象myDom=WebBrowser1.Document.getElementsByName("sa")
最后执行onclick :mydom.onclick
二.还有想要实现点击vb.net模拟按键 , 直接执行点击的相应函数即可例如vb.net模拟按键:假设想实现点击下面的Inputbox
input id="busT1" name="busT" type="radio" value="https://www.04ip.com/post/1" class="input5" checked="checked" onclick="busSwitchDiv('changeDiv')" tabindex="18"/
那么直接执行onclick里的函数busSwitchDiv('changeDiv')即可vb.net模拟按键,执行语句如下vb.net模拟按键:
WebBrowser1.Document.parentwindow.execscript "busSwitchDiv('changeDiv')"
【vb.net模拟按键 vbs模拟键盘按键】vb.net模拟按键的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于vbs模拟键盘按键、vb.net模拟按键的信息别忘了在本站进行查找喔 。

    推荐阅读