CreateObject("SAPI.SpVoice").Speak "会说话的电脑"


1 新建文本文档

2 复制 以下代码

CreateObject("SAPI.SpVoice").Speak "在这里黏贴小说的内容"



在上边代码的speak后面 双引号里面 黏贴 你的 小说

 (

小说的内容里

(1) 不要有 双引号

                      你可以把双引号替换成 空格 或者 单引号

(2)不要有 回车

                      你可以在word里
                                            在“替换”中输入：^p

                                            点全部替换 就好了

                      如果还有 回车  就再在“替换”中输入：^l

)

3 最后 文件后缀名 由txt改成 vbs 比如(小说.txt 改成 小说.vbs)





PS:



如果你的操作系统是

win7的话 就能听 汉语 和英语 的小说

是XP的话 也许只能 听英文小说