达人教你用Win7传心意！电脑帮你对她说“我爱你”

2009/12/16镜像同步10 回复

文章来源：移动labs 想像爱慕已久的她（他）表白，缺苦找不到开口的机会？嘿嘿，不用慌，爱活下面郑重为大家推荐一款表白利器——微软Windows7！没错，就是Windows7，它有充分的能力帮你传达心意。微软很早就在Windwos里低调的捆绑了语音引擎，而本次Win7附带的是最新版本，识别更准确，还能说中文！你只需要把下面这代码复制到系统自带的记事本中，然后保存为.VBS为后缀的文件就可以了： CreateObject("SAPI.SpVoice").Speak"ILOVEYOU" 双击后会听见电脑用可爱的女声发出“爱老虎油～～”的声音，语句中的"ILOVEYOU"可以随意替换成其他单词，比如"IHateYou！"。不过不管内容是什么，最好使用大写，小写的话声音会不太清楚。各位情圣们赶紧去试试吧，把编好的文件改个名字给心爱的人，说不定会让她（他）惊喜不已哦～

订阅后，新回复会通过你的通知中心匿名送达。

9 条回复

yyg747机器人#1 · 2009/12/16

....为什么我的是一个一个字母读出来的。。。【在 caoliwei (老鼠) 的大作中提到: 】 : 文章来源：移动labs : 想像爱慕已久的她（他）表白，缺苦找不到开口的机会？嘿嘿，不用慌，爱活下面郑重为大家推荐一款表白利器——微软Windows7！ : 没错，就是Windows7，它有充分的能力帮你传达心意。微软很早就在Windwos里低调的捆绑了语音引擎，而本次Win7附带的是最新版本，识别更准确，还能说中文！你只需要把下面这代码复制到系统自带的记事本中，然后保存为.VBS为后缀的文件就可以了： : ...................

CarrotH00机器人#2 · 2009/12/16

【在 yyg747 的大作中提到: 】 : ....为什么我的是一个一个字母读出来的。。。用中文吧

llz机器人#3 · 2009/12/16

不错撒

sealhuang机器人#4 · 2009/12/16

加上空格就好了，不过还是觉得发音怪怪的【在 yyg747 的大作中提到: 】 : ....为什么我的是一个一个字母读出来的。。。

Thinker机器人#5 · 2009/12/16

囧何必非用Windows 7 【在 caoliwei (老鼠) 的大作中提到: 】 : 文章来源：移动labs : 想像爱慕已久的她（他）表白，缺苦找不到开口的机会？嘿嘿，不用慌，爱活下面郑重为大家推荐一款表白利器——微软Windows7！ : 没错，就是Windows7，它有充分的能力帮你传达心意。微软很早就在Windwos里低调的捆绑了语音引擎，而本次Win7附带的是最新版本，识别更准确，还能说中文！你只需要把下面这代码复制到系统自带的记事本中，然后保存为.VBS为后缀的文件就可以了： : ...................

FuckU机器人#6 · 2009/12/17

以下程序把文本文件拖到vbs中就能朗读 If WScript.Arguments.Count <> 1 Then MsgBox "请拖到文件！" Wscript.Quit End if filename = WScript.Arguments(0) Set fso = CreateObject("Scripting.FileSystemObject") If Not fso.FileExists(filename) Then MsgBox "文件不存在！" Wscript.Quit End If Set fp = fso.OpenTextFile(filename, 1) str = fp.read(fso.Getfile(filename).size) fp.close CreateObject("SAPI.SpVoice").Speak str

xiaoy机器人#7 · 2009/12/17

【在 yyg747 的大作中提到: 】 : ....为什么我的是一个一个字母读出来的。。。呵呵

Ipjmc机器人#8 · 2009/12/19

【在 FuckU 的大作中提到: 】 : 以下程序把文本文件拖到vbs中就能朗读 : If WScript.Arguments.Count <> 1 Then : MsgBox "请拖到文件！" : ................... 喜欢，都不错啊

x7132524机器人#9 · 2009/12/19

哈哈，很好啊