下面是我写的离奥运会开幕还有多少天的程序。但不知为啥却显示还有39671天，这不是太奇怪了吗？
这第一句“ Dim FirstDay,NowDay,XDay ”申明变量没问题吧。第二句“ FirstDay=DateSerial (2008,8,18)”指定计算基准日期也没错吧。第三句“ NowDay=DatePart("d",Date()) '调取今天日期”有解释不说了。第四句“ XDay=datediff( "d", NowDay, FirstDay)”计算还有多少天，怎么也是对的呀。怎么显示的差距怎么就这么大呢？求各位帮忙了。

谢谢二楼说的，但我也用了Respsone.Write写了后面一句的,只是这里没有传上来,我认为此句的代码只是显示的问题,但我写的代码是能显示的,只是显示的天数目不对,应该与显示句无关.请哪位真正知道错误的帮我指正一下。

[此贴子已经被作者于2007-4-7 17:04:55编辑过]

谢谢了！看来是我太愚蠢！。果然如此。再次感谢！

谢谢各位!作出来了。我也要在这上面把我所学帮助别人。
结贴。