上次用了不適當的包包帶相機出門,回家拿起相機一看,竟然破了...幸好只是送的保護鏡破了。
遮光罩與保護鏡合照
' 取月的最後一天
dim m,y,nextDate,bylastdate
m=mid(month(date()))
y=year(date())
if m=12 then m=1:y=y+1 else m=m+1
nextDate=y & "-" & m & "-" & "1" '下個月的第一天
bylastdate=dateAdd("d",-1,nextDate) '這個月的最後一天
參考: http://hi.baidu.com/lauplay/blog/item/c5654c59d387f3212934f061.html