在后台运行 VB.net 程序

在后台运行 VB.net 程序

我有一个简单的程序。有一个标签(=0),当我按下“W”时,标签每次都会 +1。现在我想在后台运行它,但当我退出时,用户输入不起作用。所以我正在寻找一种使用用户输入的方法,即使我退出或最小化了程序。我真的不知道该怎么做。

希望您能帮助我。感谢您的阅读,也感谢您未来的回答

我无法发布我的问题所以不要介意我在这里

答案1

所以我找到了一种使用 AHK 的简单方法:我用 Ahk 制作了热键,每当我按下它时,它都会写入一个 txt 文件,然后 VB 只会读取 Txt 文件。问题解决了。代码:AHK:

 run, Test.exe
 number := 0
file := Fileopen("input.txt" , "w")

    file.write(number)
    file.Close()
^r::
 number := number + 1

file := Fileopen("input.txt" , "w")

    file.write(number)
    file.Close()

 return

VB:

Public Class Form1
Public NumberVB

Private Sub Update_Tick(sender As Object, e As EventArgs) Handles Update.Tick
    NumberVB = My.Computer.FileSystem.ReadAllText("input.txt")
    Label1.Text = "How often you pressed the Hotkey: " & NumberVB
End Sub

Private Sub Form1_Closed(sender As Object, e As EventArgs) Handles Me.Closed
    Dim arrProcess() As Process = System.Diagnostics.Process.GetProcessesByName("Autohotkey")

    For Each p As Process In arrProcess
        p.Kill()
    Next
End Sub
End Class

相关内容