锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net模拟输入 vb语言

IT技术输入

在vb 中怎么样用 keybd_event 模拟一字符串输入'这个需要用PostMessagevb.net模拟输入，不能用keybd_event 。
'看看这两个函数的声明就明白了 。
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
'因为PostMessage声明中有句柄参数hwndvb.net模拟输入 ， 而keybd_event声明中没有句柄参数 。
'所以PostMessage可以指向键盘消息发送对象的句柄hwndvb.net模拟输入 ， 而keybd_event只能模拟按哪个键盘，不能把键盘消息发送到指定的对象 ， 如文本框 。
'"源码可以参考"'
如何用vb.net 模拟 Dos的运行vb.net模拟输入你要用System.IO去截获命令提示行(也就是cmd)的流信息vb.net模拟输入 ， 然后才能填充到vb.net模拟输入你的winform界面控件中去 。
vs2012 vb.net 模拟网页按钮点击使用webbrowser空间实现很简单
一 。首先在窗体头部定义Dim WithEvents MyDomAs MSHTML.HTMLDocument
其次找到element对象myDom=WebBrowser1.Document.getElementsByName("sa")
最后执行onclick :mydom.onclick
二.还有想要实现点击，直接执行点击的相应函数即可例如：假设想实现点击下面的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')即可，执行语句如下：
WebBrowser1.Document.parentwindow.execscript "busSwitchDiv('changeDiv')"
VB.NET 向指定(网页或软件)的输入框内输入字符,如何实现?假如Form1有个TextBox1，双击TextBox1填入123
Public Class Form1
Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub TextBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.DoubleClick
System.Windows.Forms.SendKeys.Send("123")
End Sub
End Class
看你的VB.NET 版本了
用 My.Computer.Keyboard.SendKeys("123", True)代替 System.Windows.Forms.SendKeys.Send("123") 也可以
原码：
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub TextBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.DoubleClick
My.Computer.Keyboard.SendKeys("123", True)
End Sub
End Class
VB.net编写一个控制台应用程序用来从键盘上输入两个数然后输出这两个数的和差积商应该定义为double或者single，string类好像不能进行运算 。我简单说一下控制台的方法，你要一次性输入和差积商 ， 首先声明两个变量用来储存两个数，然后用算法一次性输出结果就ok 。
Sub Main()
Dim FN As Single
Dim SN As Single
Dim ResultNum As Single
Console.WriteLine("请输入第一个数") : FN = Console.ReadLine
Console.WriteLine("请输入第二个数") : SN = Console.ReadLine
ResultNum = FN + SN
Console.WriteLine("它们的和: "ResultNum)
ResultNum = FN - SN
Console.WriteLine("它们的差: "ResultNum)
ResultNum = FN * SN
Console.WriteLine("它们的积: "ResultNum)
ResultNum = FN / SN
Console.WriteLine("它们的商: "ResultNum)
Console.ReadLine()
End Sub
用VB.NET模拟鼠标和键盘动作？不用API模拟，用API的我会！ 用.NET框架的类库怎么模拟呢？.net框架就是对API就行封装vb.net模拟输入 ， 做成一个个的类然后可以让你轻松调用vb.net模拟输入，但是 。net封装的内容 ， 是常用的内容，有些东西用的时候，还是需要调用API函数，自己写，毕竟 ， 微软不知道你要用什么函数 ， 所以尽可能的满足用户大众口味而已 。如果你需要用的比较复杂 ， 还是调用API自己写类吧 。

推荐阅读


上一篇：linux不能输入命令了，linux为什么输不了密码

下一篇：贺兰县域电商如何发展，县域电商的发展模型有哪些