1、首先 在桌面右键新建文本文档。
2、将下方代码复制到记事本中，保存。Dim WshShellSet WshShell=wscript.CreateObject烫喇霰嘴("WScript.Shell")WshShell.Run "notepad"WScript.Sleep 500 WshShell.AppActivate "无标题 - 记事本"dim aa="i love you "for i =1 to len(a)WScript.sleep 300wshshell.sendkeys mid(a,i,1)nextdim bset b=CreateObject("SAPI.SpVoice")b.Speak("i love you")
3、然后关闭这个记事本，将记事本把后面个txt改成vbs。如果你记事本没有显示txt就随便打开一个文件夹点击“工具-文件夹选项-查看-高级设置隐藏已知文件类型扩展”前面的勾勾去掉点击确定。
4、点击就会弹出记事本，自动输入i love you 电脑也会发出i love you
