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个按钮,一是暂停;二是接着上次的记录朗诵
谢谢老师指教代码!