close

資料來源:兄弟論壇
作者:sunxhxd

//Windows+M:最小化所有視窗
KeyDown 91,1
KeyPress 77,1
KeyUp 91,1
Delay 100
//運行記事本程式
VBSCall RunApp("C:\WINDOWS\NOTEPAD.EXE")
//==獲得系統昨日日期ndate,並且以文本的形式顯示出來YYMMDD。
Dim newdate,y,m,d,ndate
newdate = date-1
y = YEAR(newdate)
m = Right("0" & MONTH(newdate),2)
d = Right("0" & DAY(newdate),2)
ndate = y&m&d
sayexpression ndate
//!==獲得系統昨日日期ndate,並且以文本的形式顯示出來YYMMDD。


arrow
arrow
    全站熱搜
    創作者介紹
    創作者 魔幻小鱉 的頭像
    魔幻小鱉

    【魔幻小鱉】的部落格

    魔幻小鱉 發表在 痞客邦 留言(1) 人氣()