Question

这是我的代码的最后一部分，我正在尝试打开命令提示符，但是当我输入send keys命令的代码时，它会发疯并打开4个命令提示并且不执行sendkeys在其中任何一个。我想要实现的是当我点击这个按钮时我想要命令提示符打开并自动为我编写这些命令我想我需要某种计时器来减慢它但我知道如何在按钮内编程计时器任何和所有的帮助将不胜感激。这是我的代码

Private Sub btnExecute_Click(sender As System.Object, e As System.EventArgs) Handles btnExecute.Click
    Process.Start("cmd.exe")
    SendKeys.SendWait("cd c:\")
    SendKeys.SendWait("{ENTER}")
End Sub

Answer 1

这就是我最终做的事情，我让它开始工作

    Dim cd As String = "CD C:\"


    Process.Start("cmd.exe")


    Threading.Thread.Sleep(2000)
    SendKeys.SendWait(cd)
    Threading.Thread.Sleep(2000)
    SendKeys.SendWait("{ENTER}")
    Threading.Thread.Sleep(2000)
    SendKeys.SendWait("START KES1.bat")
    Threading.Thread.Sleep(2000)
    SendKeys.SendWait("{ENTER}")

打开命令并在视觉基础上使用sendkey发送命令

1 个答案: