专家坐堂-记录朗读问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  记录朗读问题  (http://www.foxtable.com/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