先做如下设置：
控制面版-》语音》选Microsoft Sam
将如下保存为BAT文件，直接运行！
@echo off
echo 《无题》
echo.
echo 李商隐
echo.
echo 相见时难别亦难，东风无力百花残。
echo 春蚕到死丝方尽，蜡炬成灰泪始干。
echo 晓镜但愁云鬓改，夜吟应觉月光寒。
echo 蓬山此去多无路，青鸟殷勤为探看。
mshta vbscript:createobject("sapi.spvoice").speak("wool tea")(window.close)
mshta vbscript:createobject("sapi.spvoice").speak("lee shang yin")(window.close)
mshta vbscript:createobject("sapi.spvoice").speak("seang geyn shir narn beah eey narn? don't phone woo lee buy hwa tsarn? chueng tsarn doubt sir sir found jing. larl g chueng huay lake shere garn. shall jind darn chol yun bean guy. year yean ying jer year guang hun? perng shun tsir chee woo duer looe. chin niao yin chin way tongue carn.")(window.close)
将如下保存为BAT文件，直接运行！
@echo off
echo 《无题》
echo.
echo 李商隐
echo.
echo 相见时难别亦难，东风无力百花残。
echo 春蚕到死丝方尽，蜡炬成灰泪始干。
echo 晓镜但愁云鬓改，夜吟应觉月光寒。
echo 蓬山此去多无路，青鸟殷勤为探看。
mshta vbscript:createobject("sapi.spvoice").speak("wool tea")(window.close)
mshta vbscript:createobject("sapi.spvoice").speak("lee shang yin")(window.close)
mshta vbscript:createobject("sapi.spvoice").speak("seang geyn shir narn beah eey narn? don't phone woo lee buy hwa tsarn? chueng tsarn doubt sir sir found jing. larl g chueng huay lake shere garn. shall jind darn chol yun bean guy. year yean ying jer year guang hun? perng shun tsir chee woo duer looe. chin niao yin chin way tongue carn.")(window.close)
