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)     '电脑读出这句话

效果图:
vbs控制电脑说话,vbs获取时间,vbs小程序_vbs
哈哈,只能听到哦!