windows - 如何在 Windows VBS 脚本上更改语音

Question

所以基本上我正在制作一个程序，它可以说出我编程的任何内容，我正在 Windows 上的记事本中制作它，它是一个 VBS 脚本，但我想知道我是否可以改变声音的音高或听起来如何一般的？这是脚本:

Dim msg, sapi
Set sapi=creatobject("sapi.spvoice")
Sapi.speak"Hello world"
Lol=msgbox("Request done.")

然后我将它保存为所有文件中的 .VBS。

Answer 1

首先，您的代码中存在错误。更改 creatobject至 createobject .

现在，对于主要代码:...

Dim msg, sapi
Set sapi = createObject("sapi.spvoice")
Set sapi.Voice = sapi.GetVoices.Item(1)
sapi.Speak "Hello world"
Lol = msgbox("Request done.")

确保把这一行 Set sapi.Voice = sapi.GetVoices.Item(1)之前 sapi.Speak "..." ，否则声音将保持不变。