以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  从当前行开始朗读问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74852)

--  作者:HJG_HB950207
--  发布时间:2015/9/21 11:32:00
--  从当前行开始朗读问题
Dim sp As New DotNetSpeech.SpVoice()
sp.Voice = sp.GetVoices(String.Empty,String.Empty).Item(0)
sp.rate = -1
For idx As Integer = Tables("表A").Current.Table.Position To Tables("表A").Rows.Count - 1
 sp.Speak(" " & Tables("表A").Rows(idx)("姓名")  & Tables("表A").Rows(idx)("成绩") & "分", DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
 Next


用如上代码,从表A当前行往下开始朗读姓名和分数,现在想建2个按钮,一是暂停;二是接着上次的记录朗诵

谢谢老师指教代码!

--  作者:大红袍
--  发布时间:2015/9/21 11:36:00
--  

如果你要用默认的设置朗读语音,那么很简单:

Dim
sp As New DotNetSpeech.SpVoice()
sp.Speak(
"I am from china."
, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)

执行上面的代码,计算机或自动朗读出“I am from china.”

SpVoice有三个方法,分别为:

Speak: 朗读文本
Pause: 暂停朗读
Resume:继续朗读


--  作者:大红袍
--  发布时间:2015/9/21 11:36:00
--  

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