复制以下代码到记事本,另存为Speak.vbs
H="ziv"
Do
H=InputBox (date & time,"American English",H)
if H="" then Exit Do
CreateObject("sapi.spvoice").speak H
Loop
复制以下代码到记事本,另存为Speak.vbs
H="ziv"
Do
H=InputBox (date & time,"American English",H)
if H="" then Exit Do
CreateObject("sapi.spvoice").speak H
Loop