| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 语音校对中的当前行代码问题 (http://www.foxtable.com/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
|