CreateObject("SAPI.SpVoice").Speak 如何停止
答案:2 悬赏:80 手机版
解决时间 2021-02-04 00:43
- 提问者网友：杀手的诗
- 2021-02-03 13:51
一直在读。。关不掉了。怎么停止？
最佳答案
- 五星知识达人网友：不甚了了
- 2021-02-03 15:00
任务管理器里结束掉相应进程就好了
你写的应该是vbs脚本吧，所以进程是WScrpit.exe
结束掉就行了
你写的应该是vbs脚本吧，所以进程是WScrpit.exe
结束掉就行了
全部回答
- 1楼网友：毛毛
- 2021-02-03 16:06
vbs好像不能接受键盘动作
可以把文字放进另一个txt文件里面读
每行提示是否停止 以下以读取1.txt为例子：
msgbox("请打开声音，带上耳机或打开音响~")
dim fso,txt
set fso=createobject("scripting.filesystemobject")
set txt=fso.opentextfile("1.txt",1,true)
set speak=wscript.createobject("sapi.spvoice")
dim msg,style,title,response
msg="是否停止朗读？"
style = vbyesno
title = "控制"
do while not txt.atendofstream
speak.speak(txt.readline)
response = msgbox(msg, style, title)
if response = vbyes then
speak.pause()
wscript.quit()
else
speak.resume()
end if
loop
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯