shell - 如何将引号放入引号中（vbs，sendkeys）

Question

我需要使用 VBS 脚本在记事本中键入“。

我有这个代码：

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
wscript.sleep 500
WshShell.sendkeys "some "text""

但它显示一个错误。

Answer 1

您需要将里面的引号加倍，或者您可以使用chr(34)

Text = "my ""example"" of doubled quotes"
Text = "use " & Chr(34) & "chr ()" & Chr(34) & " function"