主题：记录朗读问题

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