Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-模块/函数/VBA

一句代码让你的电脑开口讲话

时 间:2016-10-26 20:03:32
作 者:红尘如烟   ID:10768  城市:成都
摘 要:一句代码调用Windows语音功能播报文字。
正 文:

昨日夜间跑步,奈何老天逗我玩,一霎阵雨之后成了落汤鸡。


今日早醒来,忽感头壳炸裂脑浆迸,欲仙欲死不是梦,于是歇息一日。


昏睡整日,晚上又有了些许精神,无甚聊赖瞎转悠。


偶遇一网友,言道自已在开发一个收银系统,想要做发声功能。


即:收银时,可以对应收多少金额、优惠多少金额、顾客付款多少金额、找零多少金额等进行语音播报提醒。


他目前用的是在网站上找到的方法,即把每个数字,每句话做成不同的声音文件,然后用PlaySound这个播放声音功能的API函数去播放。


但这样做起来太烦琐了,一些声音文件在网上找不到。他甚至还在想,是不是要找个声音甜美的妹纸给录一下音。问我有没有好点的方法。


我闻之大惊:你是从古代穿越来的么?!现在语音技术这么发达了,瘟到死系统自带的语音功能不要太好用,你居然还在用这么古董的方法!?


下面这一句代码就能解决:

CreateObject("SAPI.SpVoice").Speak "总共13585.43元,收您20000元,找您6414.57元!"

此君听后怔立半晌,眼神发直的望着我。


都看得我毛骨悚然,心想这厮不是垂涎我的美色,想要对我做不法的事?我是该赶紧跑呢?还是报警呢?


正当我犹疑不定之时,突然听得此人发一声大喊,狂奔而走,惊起一阵烟尘,风中飘来一把声音“我先回去改代码!……”


备   注:

遇到有的网友电脑上不能发声读出来的情况,则需要下载语音库补丁安装一下,下载地址如下

http://pan.baidu.com/s/1jIyO9pG





Access软件网QQ交流群 (群号:483923997)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助