权少老公太无情微盘:VB中怎样使电脑阅读文字?

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/29 06:26:32
用什么控件?(语音库文件我已经有了。)

首先引用“microsoft speech object library”,然后在程序中加入一个文本框text1(或者其它与文本相关的东西)和一个按钮command1,然后写入如下语句即可:
Private Sub Command1_Click()
Dim ld As SpVoice
Set ld = New SpeechLib.SpVoice
ld.Speak Text1.Text, SVSFDefault
End Sub