Autoclicker键绑定最小化VB



当我最小化程序并按F9启动和停止时,我该如何做到这一点?

我已经制作了点击器,但想制作热键/快捷键来启动。

我使用Visual Basic

为此,我认为您需要一个KeyLogger。我在这里找到了一些代码,并用它做了一个工作示例:

公开课表格1'创建变量和函数Dim T As New Timer()With{.Enabled=True,.Interval=1}将键标注为整数Private将函数GetAsyncKeyState Lib"user32"(ByVal vKey As Keys)声明为ShortPrivate Sub Form1_Load(发送方作为对象,e作为EventArgs)处理MyBase.LoadAddHandler T.Tick,T_Tick的地址End Sub私有子T_Tick(ByVal发送方为对象,ByVal e为EventArgs)对于i=1至255密钥=0key=GetAsyncKeyState(i)'如果按下此键如果键=-32767,则'写入按下的键Console.WriteLine(Chr(i))如果i=120,则'按下F9时会发生这种情况结束如果结束如果下一个iEnd SubEnd Class

希望这能有所帮助!~Nic

您可以在Form Load中添加KeyPreview = True之后执行此操作
添加一个名为keydown的事件,并添加以下代码:

If e.keycode = Keys.F9 Then
Button1.PerformClick()
End If

最新更新