使用记事本写一个最简单的语音程序

1.打开记事本复制如下代码到文件中
2.另存文件名 windows_voice.vbs
3.双击 windows_voice.vbs 电脑就能和你对话了

Dim message, sapi
MsgBox("请戴上耳机听我说....")
message = "这是在您的微软视窗系统上进行的简单语音测试。"
Set sapi = CreateObject("sapi.spvoice")
sapi.Speak message