登录社区:用户名: 密码: 忘记密码 网页功能:加入收藏 设为首页 网站搜索  

文档

下载

图书

论坛

安全

源码

硬件

游戏
首页 | 信息 | 空间 | VB | VC | Delphi | Java | Flash | 补丁 | 控件 | 安全 | 黑客 | 电子书 | 笔记本 | 手机 | MP3 | 杀毒 | QQ群 | 产品库 | 分类信息 | 编程网站
  立华软件园 - Visual Basic 专区 - 技术文档 - 多媒体 技术文章 | VB源代码 | 电子图书 | VB网站 | 相关下载 | 在线论坛 | QQ群组 | 搜索   
 VB技术文档
  · 窗体界面
  · 系统控制
  · VB.Net
  · 多媒体
  · 网络编程
  · API函数
  · 游戏编程
  · 数据报表
  · 其他文档
 VB源代码
  · 窗体界面
  · 文件目录
  · 多媒体
  · 网络编程
  · 系统API
  · 数据报表
  · 游戏编程
  · VBA办公
  · 其他代码
 VB论坛
  · Visual Basic 讨论区
  · VB.Net 讨论区
  · VB数据库开发讨论区
  · VB系统API讨论区
 其他VB资源
  · VB下载资源
  · VB电子图书
  · VB QQ群组讨论区
  · VB 其他网站资源




在我们的程序中让电脑说英语
发表日期:2004-01-29作者:zhangking[] 出处:  

    随着计算机多媒体技术的发展,让电脑唱歌说话已经不是什么新鲜事了。但是能不能在我们自己编写的软件中让电脑朗读文本信息呢?微软公司开发的一套文字朗读引擎(Text-To-Speech Engine,简称 TTS)使我们这一功能的实现变得易如反掌。只要您安装了“金山词霸2000”(或“金山词霸.net”),那么在 Windows 文件夹下会生成一个 Speech 文件夹,里面的 VTXTAUTO.TLB 文件就包含了有关的类型库和函数,我们完全可以在我们的程序中调用它们,使电脑开口说话。TTS 包含在“金山词霸”的安装盘上,文件名为 mstts.exe 和 spchapi.exe。要在 VB 程序中调用 TTS,必须首先引用 VTXTAUTO.TLB 文件中的“VoiceText 1.0 Type Library”类型库,方法是执行“工程\引用”,再点击“浏览”按钮,找到文件 \Windows\Speech\VTXTAUTO.TLB,将它添加到应用列表中,然后选中它,按“确定”按钮。这时可以按 F2 键打开“对象浏览器”查看 Vtxtauto 对象的有关参数。

  然后键入以下代码,执行它,电脑就可以说话了:

  Option Explicit

  Private Sub Form_Load()

   Call VTxtAuto.VTxtAuto.Register(Space(1), Space(1)) '注册

   VTxtAuto.VTxtAuto.Speed = 170 '设置语速(170 为正常语速,值越小语速越慢)

   Dim strTxt

   strTxt = "I'm a chinese. I love my motherland very much."

   On Error GoTo ErrorHand

   Call VTxtAuto.VTxtAuto.Speak(strTxt, vtxtsp_VERYHIGH + vtxtst_READING)

   MsgBox "OK!"

   End

   ErrorHand:

   '错误处理语句

   End

  End Sub

  美中不足的是微软的这套文字朗读引擎只能让电脑朗读英文。相信大家和我一样,盼望着国产的、技术成熟的汉语朗读软件的出现。

我来说两句】 【发送给朋友】 【加入收藏】 【返加顶部】 【打印本页】 【关闭窗口
中搜索 在我们的程序中让电脑说英语

 ■ [欢迎对本文发表评论]
用  户:  匿名发出:
您要为您所发的言论的后果负责,故请各位遵纪守法并注意语言文明。

关于我们 / 合作推广 / 给我留言 / 版权举报 / 意见建议 / 广告投放 / 友情链接  
Copyright ©2001-2006 Lihuasoft.net webmaster(at)lihuasoft.net
网站编程QQ群   京ICP备05001064号 页面生成时间:0.00203