以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]能否用按钮调出或关闭语音校对  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91189)
--  作者：jyh7081
--  发布时间：2016/10/2 10:55:00
--  [求助]能否用按钮调出或关闭语音校对
我按帮助说明进行了语音校对设置：
1、在全局代码中定义一个Public变量：
Public sp As New DotNetSpeech.SpVoice()
2、在表的ValidateEdit设置代码：
sp.Speak(e.text, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
------------------
现在想给当前表的语音校对功能加两个按钮  ”开启校对“和”关闭校对“，能否实现？
--  作者：鲁吉
--  发布时间：2016/10/3 7:56:00
--  
同问-----------
--  作者：狐狸爸爸
--  发布时间：2016/10/3 9:51:00
--  

定义一个var变量，通过这两个按钮的值，将变量设置为True或者False.

 

if Var("变量")= True then

   sp.Speak(e.text, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)

end if

 

参考：

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

 
--  作者：jyh7081
--  发布时间：2016/10/3 10:50:00
--  
Vars.Add("校对",Gettype(Boolean),False)

If Vars("校对")= True Then
    sp.Speak(e.text, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
End If

提示：text不是ribbonbuttoneventargs成员
[此贴子已经被作者于2016/10/3 11:18:47编辑过]
--  作者：狐狸爸爸
--  发布时间：2016/10/3 19:08:00
--  
如果是新同学，这样的问题，我很乐意回复。
但是作为4年的老用户，你这一问让我很沮丧，接近崩溃。

AfterOpenProject事件：
Vars.Add("校对",Gettype(Boolean),False)

开启校对按钮：
Vars("校对")= True

停止校对按钮：
Vars("校对")= False

VaidateEdit事件：
If Vars("校对")= True Then
    sp.Speak(e.text, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
End If


[此贴子已经被作者于2016/10/3 19:17:15编辑过]