vbs控制電腦說(shuō)話，vbs獲取時(shí)間，vbs小程序
2021-07-31 12:18:32

VBS也挺強(qiáng)大的呢，這篇給大家演示的是獲取當(dāng)前時(shí)刻，并根據(jù)不同的時(shí)間段來(lái)問(wèn)好！

注：編輯器不支持vbs編程，單引號(hào)后是注釋哦！

d=Date()
t=Time()
h=Hour(t)    '獲取到當(dāng)前的小時(shí)

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 & "好呀！"     '拼裝好問(wèn)好的話   
CreateObject("SAPI.SpVoice").Speak(lady)     '電腦讀出這句話

效果圖：

哈哈，只能聽到哦！

?