以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  声音校对问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74757)
--  作者：HJG_HB950207
--  发布时间：2015/9/18 11:07:00
--  声音校对问题
表有两列，姓名，分数
如何建按钮，自动从上到下自动朗读，便于校对。
谢谢老师！
--  作者：Hyphen
--  发布时间：2015/9/18 12:20: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