vbs代码怎样让电脑说中文

CreateObject("SAPI.SpVoice").Speak"你好"

新建一个txt文本文件，把上面的代码复制到这个文件中，然后保存，再把.txt改为.vbs双击就可以朗读了。

Set WshShell=wscript.createobject("Wscript.Shell")

Set objIE = CreateObject("InternetExplorer.Application")

objIE.Navigate("about:blank")

objIE.document.parentwindow.clipboardData.SetData "text","这是你想输入的中文..."

objIE.Quit

msgbox "已以将你相输入的中文复制到剪切版，你可以利用sendkeys发送ctrl+v来输入了。",0,"提示"

---