VBS也挺强大的呢,这篇给大家演示的是获取当前时刻,并根据不同的时间段来问好!
注:编辑器不支持vbs编程,单引号后是注释哦!
d=Date()
t=Time()
h=Hour(t) '获取到当前的小时
if h<9 then
k="早上"
elseif h<12 then
k="上午"
elseif h<14 then
k="中午"
elseif h<18 then
k="下午"
else
k="晚上"
end if
lady="大美女," & k & "好呀!" '拼装好问好的话
CreateObject("SAPI.SpVoice").Speak(lady) '电脑读出这句话
效果图:
哈哈,只能听到哦!
本文摘自 :https://blog.51cto.com/l