vbs控制電腦說話，vbs擷取時間，vbs小程式

​

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)     '電腦讀出這句話      

效果圖：

哈哈，隻能聽到哦！

喜歡的點個贊❤吧！