请教

我在设置异步朗读的时候经常会出现朗读不完整的情况。

特别是  同一时间 有2个 语句需要进行 朗读 ，  经常就只读 1到2个字符  就没了 。

同步朗读 就没有问题。    

该怎么调整？

我 用  for  next  语句  进行 朗读。

应该  进行几次 next   的循环     也算是不在同一时间  （可能要用毫秒来区分！）

但 异步朗读  就 不会朗读完整。

同步 就可以 。。。

代码如下

Dim sp As New DotNetSpeech.SpVoice()
If Forms("出货管理板").Opened  Then
    Dim dt As DataTable = DataTables("出货基础信息表")
    For Each  dr As DataRow In dt.DataRows
        If dr("单") = True Then
            For i As Integer = 2 To 4
                If dr(dt.DataCols(i).Name) = Format(Date.Now,"HH:mm") Then
                    Dim str As String = (dr(dt.DataCols("客户")) & "," & dr(dt.DataCols(1).Name) & "," & dt.DataCols(i).Name.Replace("计划开始","")  & ",时间," &  Format(dr(dt.DataCols(i).Name),"HH:mm") & "到了,请作业!")
                    sp.Speak(str ,DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync) \' DotNetSpeech.SpeechVoiceSpeakFlags.SVSFDefault)
                End If
            Next
        End If
    Next
End If

颜色部分  异步朗读 老是读不出来。

 这句放在循环里面看看

Dim sp As New DotNetSpeech.SpVoice()

代码 在 计划任务 里面 。

1、朗读的功能 会因为  其他操作  打断，

2、朗读的语句多的时候 会自动 打断。 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:新建文件夹 (2) - 副本.zip

顶起 ， 老师帮忙测试一下

 把这句代码写到全局代码那里去。

Public sp As New DotNetSpeech.SpVoice()

 其余的调用不要定义了，直接写 sp.Speak(str ,DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)