如何制作文本到语音的 vbs 脚本

Question

我正在尝试制作一个 VBS 文件，该文件会显示我输入的内容，但原始代码根本不起作用，我该怎么办 sapi.voice create box sapi speak("Hello world")

Answer 1

Dim message, sapi
message=InputBox("What do you want me to say?","For all in need")

Set sapi=CreateObject("sapi.spvoice")
sapi.Speak message  

说明：这仅适用于 VBS。它适用于任何支持 VBS 的设备。
它显示一个文本框，该文本框将显示消息“你想让我说什么”

无论您输入什么，它都会显示出来。