牧夫天文网

 找回密码
 加入牧夫(请注明天文爱好者,否则无法通过审核)

QQ登录

只需一步,快速开始

让电脑替你说Happy New Year

[复制链接]
positron 发表于 2010-1-1 12:06 | 显示全部楼层 |阅读模式 来自: 北京市 鹏博士BGP

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?加入牧夫(请注明天文爱好者,否则无法通过审核)

x
偶尔在一个论坛上学到的代码,附件中的文件解压,双击运行即可。放心,不是恶意代码。

如果细心的话,将文件用记事本打开,将Speak "Happy New Year"中的Happy New Year换成任何东西,电脑都会替你读出来,不过,只支持英文。(据说W7、Vista可能支持中文)

另外,貌似字母大写声音会大些。

Happy New Year.rar

133 Bytes, 下载次数: 203

西铁成 发表于 2010-1-2 00:38 | 显示全部楼层 来自: 安徽省合肥市 电信 合肥工业大学(南区/新区)寝室楼
好玩~。。。。。。。。。。。。。。
回复 支持 反对

使用道具 举报

AJJ 发表于 2010-1-2 01:00 | 显示全部楼层 来自: 江苏省南京市 电信
在校内上也看到过,试了下可以的哇~~
可以代替你和女朋友说我爱你哦~~~
回复 支持 反对

使用道具 举报

asinasina 发表于 2010-1-2 01:34 | 显示全部楼层 来自: 湖北省武汉市 电信
CreateObject("SAPI.SpVoice").Speak "新年快乐"
CreateObject("SAPI.SpVoice").Speak "我爱你"
CreateObject("SAPI.SpVoice").Speak "i love you"
保存为vbs后缀就可以了,win7下可以说中文
回复 支持 反对

使用道具 举报

本版积分规则

快速回复 返回顶部 返回列表