主题：如何判断异步朗读结束

直接在异步朗读代码后面跟上朗读结束的提示或设置全局变量值，判断变量不就可以了，比如：

Dim sp As New DotNetSpeech.SpVoice()
sp.Speak("I am from china.", DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)

MessageBox.show("朗读结束")

或者增加一个名称为"朗读标识"的字符型全局变量，代码为：

Vars("朗读标识") = "朗读中……"

Dim sp As New DotNetSpeech.SpVoice()
sp.Speak("I am from china.", DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)

Vars("朗读标识") = "朗读结束"

需要判断的时候，判断这个全局变量的值即可。