今天来一篇短小却非常有意思的文件,让你的电脑说你想让她说的话,直接上代码:
Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
使用方法,将上面的代码复制到新建的空白文本文件中,保存为“说话.vbs”文件即可,然后在窗口中双击这个文件,出现下面的对话框
在对话框中的文本框中输入你想让她说的话,点击确定,你会发现整个世界都是你的。注意电脑声音音量打开哦!