主题：语音库选择问题

Dim Speaker As New DotNetSpeech.SpVoice()

Dim vl As String = "牧"
Speaker.Rate = -7 '设置语速
Speaker.Voice = Speaker.GetVoices(String.Empty,String.Empty).Item(1) '选择语音库

    Speaker.Speak(vl, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFDefault) '同步朗读

 

 

我安装了1个新的语音库

 

我按照帮助里面的代码 进行修改  直接选择item(1)  .

 

但读不出内容

 

语音库为:     0:microsoft sam 1:vw misaki

 

 

 

请教 ,该如何直接选择语音库进行朗读?

 

 你问过了啊

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=60872&skin=0

 

 如果你的是xp系统，是不能读中文的，只有win7才有中文语音库。

中文语音库，参考

 

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=25484&page=6

 

老师 我测试过

Dim Speaker As New DotNetSpeech.SpVoice()
Dim vl As String = "岩本"
For Each st As Dotnetspeech.SpObjectToken In Speaker.GetVoices
    If st.GetDescription = "vw misaki" Then
       Speaker.Rate = 0
        Speaker.Voice = st
Speaker.Speak(vl, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFDefault) '同步朗读
        Exit For
    End If
Next

 

 

这个代码 发觉 每次的朗读的间隔 起码要40秒左右？

 

怎么把这个速度提高？

1、Speaker 定义在publish变量里。

 

2、这段代码写到afteropenproject里。

 

For Each st As Dotnetspeech.SpObjectToken In Speaker.GetVoices
    If st.GetDescription = "vw misaki" Then
        Speaker.Rate = 0
        Speaker.Voice = st
        Exit For
    End If
Next

 

3、朗读的时候直接写 Speaker.Speak(vl, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFDefault) '同步朗读

但我要判断内容是否 语句是否包含日语50音图的单词， 如果包含就用 日语语音库  不包含就用 中文的语音库

 回复7楼，那你就用一个数组存储 Speaker.GetVoices 的 GetDescription

 

 然后，在数组里面查找取出设置item

多谢老师指导，明白了