系统自带语音朗读功能的简单应用
校内上有同学介绍说,xp以后的系统可以用以下的代码来朗读文字: CreateObject("SAPI.SpVoice").Speak "你好" 具体的实现方法为: 新建一个记事本,在里面输入 CreateObject("SAPI.SpVoice").Speak "I love YOU" 保存扩展名为VBS文件 如1.vbs,双击运行 这就有一个问题,这个控件只能读事先设好的东西,我们可以利用VB做一个小程序,实现阅读输入文本内容的目的 我们可以这样设计程序的界面: 代码如下: Private Sub Command1_Click() CreateObject("SAPI.SpVoice").Speak Text1.Text & "" \\意思是:点击command1这个按钮时,朗读text 1文本框中的内容 End Sub Private Sub Command2_Click() End End Sub \\意思是:点击command2时,退出程序 Private Sub Text1_Change() End Sub 完工了就是这个样子,我黑给了他个图标。。 很简单吧。。。不过这个东西最大的缺陷就是,一旦说话就停不下来。。。。恩。。 下载地址:https://worldtree.net/down/voice.exe 下不了啊。。。如果你是教育网那我也帮不了你了。。