- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 朗读点击 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=24423)
-- 发布时间：2012/10/13 15:02:00
-- 朗读点击
各位好：
我现在编的一个小的培训系统，目前还有一个问题需要解决
我按照http://www.foxtable.com/help/index.html?n=2240.htm写入，目前出现如下现象
不能在点击区域（鼠标单击）马上发音，必须双击这个区域，然后换行才能发音
也就是当我单击表的第一行时不能发音，必须双击第一行，然后换下一行时才能发音
我需要单击某区域后马上发音（朗读）
谢谢
-- 发布时间：2012/10/13 15:14:00
--
代码写错位置了吧？做个例子传上来瞧瞧
-- 发布时间：2012/10/14 10:55:00
--
密码 888
文件放D盘
-- 发布时间：2012/10/14 10:56:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:复件 学习系统.zip |
-- 发布时间：2012/10/15 10:40:00
--
需要在Click事件里编写如下代码
sp.Speak(e.Row(e.Col.Name), DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
-- 发布时间：2012/10/16 15:56:00
--
请问能否实现点击一个按钮后自动播放（同一列向下）
-- 发布时间：2012/10/16 16:13:00
--
可以，弄一个按钮，写入如下代码。如果要中途停止，还要在添加一个全局变量去判断和退出。
Dim t As Table = CurrentTable
Dim r As Integer = CurrentTable.RowSel
Dim c As Integer = CurrentTable.ColSel
For i As Integer = r To t.Rows.Count - 1
sp.Speak(t.Rows(i)(c), DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
Next