
ssfi
让电脑说话,你输什么电脑就说什么
>>
完整版
把以下这段代码复制到记事本,然后保存为.VBS文件,双击打开........绝对不是病毒...
在VISTA下是女声,XP为男声..呵呵...不敢独享,给大家分享下....
Dim msg,sapi
msg=InputBox("输入文字","开口讲话")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg