Windows系统朗读一段自定义的话

使用CreateObject(“SAPI.SpVoice”).Speak “朗读内容”

• CreateObject(“SAPI.SpVoice”).Speak “Great”
• 复制上面代码粘贴到记事本(txt)里
• 将记事本格式改成 .vbs
• VBScript脚本语言实现的

还可以增强一下

for i = 0 To 5 
 msgbox"斜眼笑"
 CreateObject("SAPI.SpVoice").Speak "Great"
Next

写中文报错！或者朗读不了中文是缺少SAPI反正平时也不常用试着玩玩就好