以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  记录朗读问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74769)
--  作者：HJG_HB950207
--  发布时间：2015/9/18 14:40:00
--  记录朗读问题

Dim sp As New DotNetSpeech.SpVoice()

sp.rate = -3
For idx As Integer = 0 To Tables("表A").Rows.Count - 1
    sp.Speak("姓名" & Tables("表A").Rows(idx)("姓名") & "分数" & Tables("表A").Rows(idx)("分数"), DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
Next

按如上老师指点代码，读取记录，读几条就自动停了，试问，是否是试用版限制的问题，谢谢老师！
--  作者：Hyphen
--  发布时间：2015/9/18 15:12:00
--  

Dim sp As New DotNetSpeech.SpVoice()

把定义放到全局代码中
--  作者：大红袍
--  发布时间：2015/9/19 10:15:00
--  

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