vb后台按键源码

❶ VB 后台 模拟按键 求助

代码我就不多写了，写多了也晕，本人有想过你这个功能，但是具体实现还是没有实现过。我说一下我认为的理论思路。
首先这个肯定要使用API函数了，初步涉及3个。
PostMessage '
SendMessage '
GetWindow( m_LocalWnd, GW_CHILD),

这个API的功能可以网络查查详细的，这就不细说了。下面简单引用一下。
此函数为指定的窗口调用窗口程序，直到窗口程序处理完消息再返回。而函数PostMessage不同，将一个消息寄送到一个线程的消息队列后立即返回。

说一下你的问题的思路。
1。获取B程序的控制句柄，
2。获取B程序的需要发送到哪个子控件的子句柄。
通俗一点举例说明就是：B程序有一个界面，界面上有三个编辑窗，需要往哪个编辑窗里面输入"F"这个字符？如果是当前界面，光标闪的那个拿键盘输入肯定没问题，但问题是B程序是后台运行的，不是当前的，所以要获得B程序里面的需要发送的，也就是哪个控件接收这个“F”字符的“子控件句柄”。
例如：获取方法有很多，可以使用GetWindow( m_LocalWnd, GW_CHILD), GW_HWNDNEXT 来枚举B程序的每个子控件，GetClassName 来判断那个子控件的类名称是 什么，然后确定或者使用代码判断。

3.使用 PostMessage, sendmessage 向程序发送信息。

这只是思路，看你的意图好像是编写某脚步，实现某游戏挂机的目的。上有对策下有政策。这些都是老思路了，如果是成熟的游戏他应该是把这种屏蔽掉了看，需要使用更进一步的手段对付。
SendMessage的详细说明链接看吧，列出来贴出了太乱了。
http://ke..com/view/1080187.html?wtp=tt

PostMessage：
http://ke..com/view/1080179.htm

GetWindow：
http://ke..com/view/1080323.htm

以上全是个人意见，仅供参考。
如有雷同纯属巧合
希望对你有帮助。

软件屏蔽虚拟按键很正常的。

❷ 按键精灵怎么后台删除，桌面新建文件夹里的第一个文档

你好。代码在这里,如果路径不对就自己修改一下
//1.获取桌面路径
VBSBegin
Set bag = GetObject("winmgmts:\\.\root\cimv2")
Set coc = bag.ExecQuery("Select * from Win32_ComputerSystem")
For Each objcomputer in coc
a=objcomputer.username
next
VBSEnd
b = split(a, "\")
c = b(UBound(b))
ml = "C:\Users\" & c & "\Desktop\新建文件夹\"
//2.遍历指定目录下所有文件名
wj = Lib.文件.遍历指枣困定目录下所有文件名("C:\Users\" & c & "\Desktop\新建文件夹\")
//3.判断是否为文本文档，如果是就删除。然后结束脚本
For i = 0 To UBound(wj) - 1
wjm = split(wj(i), ".")
If wjm(UBound(wjm)) = "txt" Then
Call Plugin.File.DeleteFile("C:\Users\" & c & "\Desktop\新建文件夹\谈岩穗" & wj(0))
TracePrint "已删除"&"C:\Users\含卜" & c & "\Desktop\新建文件夹\"&wj(i)
EndScript

Else
End If
Next