以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]语音朗读  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74562)

--  作者:WUZHAN
--  发布时间:2015/9/14 10:45:00
--  [求助]语音朗读

我在DataColChanged事件中写了如下代码,为何有的行朗读,有的行就不朗读,请老师们帮忙。

If e.DataCol.Name = "客户名称" Then \'如果正在输入的是客户名称列
    If e.NewValue  > "" Then \'如果已经输入内容
        Dim sp As New DotNetSpeech.SpVoice()
        sp.rate = -3      
        sp.Speak(e.NewValue, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)      
    End If
End If


--  作者:大红袍
--  发布时间:2015/9/14 10:58:00
--  

这句代码去掉

 

Dim sp As New DotNetSpeech.SpVoice()

 

去全局代码写代码

 

public sp As New DotNetSpeech.SpVoice()