类型变量字符串作为文本 VBS

【问题标题】：Type variable string as text VBS类型变量字符串作为文本 VBS
【发布时间】：2017-07-18 12:04:17
【问题描述】：

我是 VBS 新手，只是想弄清楚如何运行一个提示用户输入的脚本，然后将结果作为句子的一部分输入？

我正在使用 WshShell.SendKeys，因为我希望脚本灵活并且能够将文本输入到不同的程序中，有没有办法让这种类型的东西输入到 InputBox 中？

谢谢！

【问题讨论】：

【解决方案1】：

这是一个非常简单的示例，说明如何让 InputBox 接受您的输入，然后将键发送到命令提示符。我认为您可以很容易地弄清楚如何将其用于任何其他程序。

Option Explicit

Dim a
a = InputBox("Enter your name", "Example")

Dim sh
Set sh = WScript.CreateObject("WScript.Shell")
sh.Run "cmd"
WScript.Sleep 200 
sh.AppActivate "C:\Windows\system32\cmd.exe" 
WScript.Sleep 200 
sh.SendKeys "echo Hello " & a & "!"
sh.SendKeys "{ENTER}"

当您运行它并输入单词“CrowStorm”时，CMD 将打开并回显句子“Hello CrowStorm！”

【讨论】：