主题：怎么设置才能正确阅读手机号？

 Speaker.Rate = 6  '设置语速
Speaker.Voice = Speaker.GetVoices(String.Empty,String.Empty).Item(0) '选择语音库
Speaker.Speak("", DotNetSpeech.SpeechVoiceSpeakFlags.SVSFPurgeBeforeSpeak) '停止之前的朗读
Dim str As String ="1351234321"
For i As Integer = 0 To str.Length-1
    Speaker.Speak(str(i), DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync) '异步朗读
Next