使用文本语音开发包实现语音朗读功能
来源:互联网 发布:怎么查行业数据 编辑:程序博客网 时间:2024/05/01 17:33
最近在网上闲逛,发现了一个文本语音开发包,使用它,可以方便的实现将文字变成语音输出的功能。我一直就比较看好软件语音的发展,连比尔盖茨都说,文字操作系统,图形操作系统,下一个技术发展的趋势就是语音版操作系统,虽然没有接触WINDOWS XP,但听说,里面已经集成了一定功能的语音程序。
闲话少说,下载开发包后,经过研究,我发现通过这个开发包在软件中加入语音功能非常简单,虽然功能有限,但让我这个只会VB编程的人来说,简单的几条语句,就可以实现,马上我的软件中就要有语音功能了。
使用开发包前,必须到软件网站下载语音包,网址:http://www.smartysoft.cn/smvoices/download.html, 你可以根据你的需求下载相应的语音包,安装到你的电脑上。其中有中文语音库:实现中文朗读功能;英文语音库:实现英文朗读功能,当然你可以把它们一起下载下来,按照不同的需要调用不同的语音库。当然,我认为这虽然不可避免,但是语音库的文件都有些大,我的软件也就1M左右,但一个中文语音库就快到1.7M,软件体积就一下子变大了。当然,不同的人看法不同,也许有人不在乎呢?呵呵!
下面,我就通过一个实例来说明如果实现语音功能。
第一步,将smartread.dll动态链接库放到系统文件夹或运行文件相同的文件夹中,因为这个文件是语音实现的核心文件,必须让软件能够找到它。开发包中有这个链接库,复制一下就可以了。
第二步,打开VB,新建一个模块,在代码页开始输入下面的语句。
Type BE_VERSION
byDLLMajorVersion As Byte
byDLLMinorVersion As Byte
chDay As Long
chMonth As Long
chYear As Long
End Type
这是开发包版本型号的结构,包括软件版本,软件开发时间。当然,如果你根本不想知道的话,这一步也可以不做。
第三步,新建一个窗体,在一开始加入:
Private Declare Function Dll_SmartRead_InitialVB Lib "smartread.dll" (ByVal hwndFrom As Long) As Long
Private Declare Function Dll_SmartRead_CloseVB Lib "smartread.dll" (ByVal bNull As Long) As Long
Private Declare Function Dll_SmartRead_SetDialogVB Lib "smartread.dll" (ByVal hwndFrom As Long) As Long
Private Declare Function Dll_SmartRead_SpeakVB Lib "smartread.dll" (ByVal str As String, ByVal bstyle As Long) As Long
Private Declare Function Dll_SmartRead_StopVB Lib "smartread.dll" (ByVal bNull As Long) As Long
Private Declare Function Dll_SmartRead_VersionVB Lib "smartread.dll" (ByVal bNull As Long) As BE_VERSION
Private Declare Function Dll_SmartRead_InitialVB Lib "smartrea 这是smartread.dll动态链接库中,函数的声明,从函数名就可以看出,这是专门针对VB的函数。我简单介绍一个这几个函数的基本的功能。
Dll_SmartRead_InitialVB:用于初始化语音功能,必须在最初调用
Dll_SmartRead_CloseVB:用于关闭语音功能,在程序退出前调用,释放资源
Dll_SmartRead_SpeakVB:朗读函数。
Dll_SmartRead_StopVB:停止朗读函数
Dll_SmartRead_SetDialogVB:用于打开语音设置对话框,改变语音,音量,语速等
Dll_SmartRead_VersionVB:显示开发包版本信息(这个函数可以不用,如果要用的话,就必须作第二步)
第四步,现在就可以在软件中实现语音功能了。
1. 调用Dll_SmartRead_InitialVB
Dim ddd As Long
ddd = Dll_SmartRead_InitialVB(Me.hWnd) '调用初始化函数
2. 调用Dll_SmartRead_SetDialogVB
Dim ddd As Long
ddd = Dll_SmartRead_SetDialogVB(Me.hWnd) '调用设置函数,可以改变到中文语音库
3. 用Dll_SmartRead_SpeakVB
Dim ddd As Long
ddd = Dll_SmartRead_SpeakVB(“中文语音开发包”, 0) '朗读函数
4. 调用Dll_SmartRead_CloseVB
Dim bNull As Long
Dim ddd As Long
ddd = Dll_SmartRead_StopVB(bNull) '调用停止朗读函数
5. 调用Dll_SmartRead_CloseVB
Dim bNull As Long
Dim ddd As Long
ddd = Dll_SmartRead_CloseVB(bNull) '调用关闭函数
这么样,开发包的使用非常简单吧,如果你没有非常需求,文本语音开发包大概就可以满足你的要求了,当然如果你觉得开发包功能不够的话,就要研究微软的Speech API了,但是实现起来没有这么简单了,萝卜青菜,各有所好罢了。
如果你对这种方法感兴趣,可以到文本语音开发包的网站去看一看,现在已经推出1.1版本了。http://www.smartysoft.cn/smartreadsdk/index.html
最后要说明一下,这个开发包只是测试版本,会有注册提示。如果要得到全功能版本,必须要注册,具体信息,到上面的网址去找吧。- 使用文本语音开发包实现语音朗读功能
- 使用文本语音开发包实现语音朗读功能(VB方法)
- ios7实现语音朗读功能
- 文本语音朗读开发包 v6.0 官方
- 使用微软TTS语音引擎实现文本朗读
- c#文本朗读功能(文本to语音)
- android 中文语音朗读文本
- ios集成语音朗读功能
- 【VC++技术杂谈004】使用微软TTS语音引擎实现文本朗读
- C#语音朗读文本 — TTS的实现
- 在网页上通过JS实现文本的语音朗读
- Android联合第三方实现使用TextToSpeech实现语音朗读的功能
- TTS实现文字语音朗读
- Android 轻松实现语音朗读
- iOS 如何实现 语音朗读
- Java实现语音朗读电子书
- 文本语音朗读电子书 2005 免费
- 文本语音朗读软件 c#程序
- 用vc线程模拟实现并行算法
- WINDOWS程序工作原理(1)
- 系统分析员级下午试题I的解答方法
- 系统分析员级下午试题II(论文)的解答方法
- 如何在网上最有效率地推广软件
- 使用文本语音开发包实现语音朗读功能
- 中英文混读,文本转换到MP3的语音软件
- 我的面向对象程序观
- 排列组合与回溯算法
- 基于JOONE快速开发神经网络
- 组件介绍 (清晰,全面的快速入门读物)
- 蠢人的黃金 (软件工程,快速开发)
- 完美程序设计指南
- "不公平录取线"评论:困惑的问号和愤慨的惊叹号