Office中国论坛/Access中国论坛

标题: TTS文本朗读引擎VBA演示（源码） [打印本页]

作者: tanhong 时间: 2008-3-14 20:44
标题: TTS文本朗读引擎VBA演示（源码）
演示ＴＴＳ引擎朗读文本，如要实现朗读中文文本，可在安装office2003时，安装共享功能中语音输入，便可得到中文引擎（见下图）
[attach]28877[/attach]

下面为制作语音朗读软件界面：源码公开，请大家多提宝贵意见
[attach]28878[/attach]

实例下载：

作者: tmtony 时间: 2008-3-14 20:52
不错,收藏了, 我用Access也做了个英语单词学习小精灵, 原理一样

作者: tanhong 时间: 2008-3-14 21:14
老大的大作我已收藏了,这个是我根据VB学习资料做的

作者: huangqinyong 时间: 2008-3-14 21:38

刚试了Stop键,好象比王宇虹的要好,学习了,江版,

[ 本帖最后由 huangqinyong 于 2008-3-14 21:43 编辑 ]

作者: tanhong 时间: 2008-3-14 21:46
huangqinyong兄有空也来为论坛出出力哦,别做闲人哦

作者: huangqinyong 时间: 2008-3-14 21:50
谢谢邀请，不胜荣幸，定尽力量。江版辛苦了

作者: andymark 时间: 2008-3-14 21:55
不错的例子　

要是能整个单词读就更加V ery Good

作者: tanhong 时间: 2008-3-14 22:19
整个单词应该是可以读的只要中间没有空格,不过我现在想要解决是中英文实现混读的功能,这个可能需要加入一些算法.不知道ANDYMARK兄能否也思考思考,帮助解决这个难题.

作者: fan0217 时间: 2008-3-15 10:35
不错，收藏！

我以前写了个朗读文本的函数和可朗读的英汉词典。

作者: liwen 时间: 2008-3-15 10:37
中英文混读，只要把中文和英文分开就可以了，如：.Speak("<LANG LANGID='804'>中文朗读<LANG LANGID='409'>English speak"）

作者: tanhong 时间: 2008-3-15 16:25

原帖由 liwen 于 2008-3-15 10:37 发表
中英文混读，只要把中文和英文分开就可以了，如：.Speak("中文朗读English speak"）

谢谢liwen提供不错的实例,不过不是VB或是ACC版的,无法学习源码,不过还是要谢谢你

作者: liwen 时间: 2008-3-15 16:46
不是VB或ACC版的，但提供了源码，只不过语法有点不同，相信这个不会为难你！

作者: tanhong 时间: 2008-3-15 16:52
我没有此软件哦,能否把源码贴了文本中发一个上来

作者: liwen 时间: 2008-3-15 17:07
用记事本打开这个文件即可：Unit1.pas

作者: tanhong 时间: 2008-3-15 17:22
哈哈,是不是真的,那谢了,我试试看

作者: ABCaccess 时间: 2008-6-1 18:28
谢谢你与大众分享

作者: YCLOVE 时间: 2008-12-26 01:11
不错的例子

作者: jsan999 时间: 2009-3-2 19:45
yjgjyhyj

作者: 021230ww 时间: 2009-3-10 16:18
老大的大作我已收藏了,这个是我根据VB学习资料做的

作者: yodong 时间: 2009-4-13 15:05
太历害了

作者: chaojianan 时间: 2009-10-11 20:28
谢谢江版。

作者: yhf 时间: 2009-12-29 11:19
收藏！

作者: xuwenning 时间: 2009-12-30 11:46
好东西
收藏了
谢谢分享

作者: sgrshh29 时间: 2010-1-20 16:46
这个也看看。

作者: fong 时间: 2010-12-31 11:45
wa,好东西，学习

作者: xingzhihao 时间: 2011-6-2 17:34
看看

作者: mr.chen 时间: 2011-6-14 12:59
www.office-cn.net

作者: ZFL68622888 时间: 2013-1-16 22:53
kaknnkan

作者: alan14500171 时间: 2014-2-22 23:09
很好很实用

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)