以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  在窗体上一边显示文本一边朗读，这个应该怎样设计？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=117176)
--  作者：yellow
--  发布时间：2018/4/8 11:12:00
--  在窗体上一边显示文本一边朗读，这个应该怎样设计？
设计了一个语音朗读的功能：按顺序朗读表A第一列的内容，并在窗体上显示朗读的内容。但运行结果却是朗读完才显示最后一个朗读内容。这应该怎样设计？

Dim yw As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim v As String
Dim Speaker As New DotNetSpeech.SpVoice()
For i As Integer = 0 To 5
    v  = Tables("表A").Rows(i)("第一列")
    yw.Text = v
    ‘MessageBox.Show(1)   \'启用这一行,则能正常显示
    Speaker.Speak(v, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
Next
--  作者：有点甜
--  发布时间：2018/4/8 11:56:00
--  

看看这里

 

http://www.foxtable.com/webhelp/scr/1476.htm