日期如何累加咧?(編號：456)

For Example:
Dim Date,Date1
　Date="890101"
　Date1=Date加一天--＞請問該如何做咧???
TKS