以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  语音校对中的当前行代码问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74991)

--  作者:HJG_HB950207
--  发布时间:2015/9/24 8:32:00
--  语音校对中的当前行代码问题
表A共三列,姓名,成绩, A,其中A为逻辑列。
建一校对窗口

我意在每读一列,该记录A列打勾做标记.用如下【校对】按钮的代码行不通(运行结果是只对开始行打了勾,其他接着的记录没打勾),请老师指教修改错误。
Dim sp As New DotNetSpeech.SpVoice()
sp.Voice = sp.GetVoices(String.Empty,String.Empty).Item(0)
sp.rate = -1

For idx As Integer = Tables("表A").Current.Table.Position To Tables("表A").Rows.Count - 1
  sp.Speak(" " & Tables("表A").Rows(idx)("姓名")  & Tables("表A").Rows(idx)("成绩") &    "婚",DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync) 
  Tables("表A").CURRENT("A")=TRUE           ‘????
Next



--  作者:大红袍
--  发布时间:2015/9/24 9:18:00
--  

请参考

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=74875&skin=0