【魔幻小鱉】的部落格

資料來源：兄弟論壇
作者：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。