
'复制以下代码到记事本,另存为Speak.vbsH="dusk colmar" DoH=InputBox (date & time,"American English",H) if H="" then Exit DoCreateObject("sapi.spvoice").speak HLoop

'复制以下代码到记事本,另存为Speak.vbsH="dusk colmar" DoH=InputBox (date & time,"American English",H) if H="" then Exit DoCreateObject("sapi.spvoice").speak HLoop