Set objVoice = CreateObject("SAPI.SpVoice")
Set objVoice.Voice = objVoice.GetVoices("Name=Microsoft Simplified Chinese").Item(0)
'这里的Microsoft Simplified Chinese是指微软中文语音库的名称,如果你调用了其他语音库,改成你安装的那个语音库的名称即可
objVoice.Rate = 3 '速度,自己修改试一下
objVoice.Volume = 100 '声音
objVoice.Speak "请朗读我" '这里可以输入你想朗读的东西
CreateObject("SAPI.SpVoice").Speak"你好"新建一个txt文本文件,把上面的代码复制到这个文件中,然后保存,再把.txt改为.vbs双击就可以朗读了。
新建一个记事本,在里面输入 CreateObject("SAPI.SpVoice").Speak "I love YOU"
保存扩展名为 .VBS 文件
如:我爱你.vbs
双击运行,电脑就会说 i love you 了
CreateObject("SAPI.SpVoice").Speak<空格>"I love YOU"
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)