VB计算两个日期间隔天数

[zhangjinfengqiming]

Text1.text 显示第一个日期
Text2.text 是第二个日期 （这两个日期肯定不是同一天）
Text3.text 显示两个日期间隔天数，请问应该怎么算？
要是遇到2012/4/21和2012/5/1这种情况怎么能不出问题？

[vrgame]

参考看看：
http://topic.csdn.net/u/20120425/19/0e989db6-d899-4801-b03e-458c449e41d5.html
又，
2012/4/21和2012/5/1比较时会出现什麽问题？

[of123]

Cdate 函数自动适应多种日期字符串格式：

?Cdate("2012/5/1") - Cdate("2012/4/21")
10

?Cdate("2012/5/1") - Cdate("2012-4-21")
10

?Cdate("5/1/2012") - Cdate("2012-4-21")
10

[zhangjinfengqiming]

谢谢~这个挺好[Quote=引用 2 楼 的回复:]

Cdate 函数自动适应多种日期字符串格式：

?Cdate("2012/5/1") - Cdate("2012/4/21")
10

?Cdate("2012/5/1") - Cdate("2012-4-21")
10

?Cdate("5/1/2012") - Cdate("2012-4-21")
10
[/Quote]

[vnvlyp]

用内置函数DateDiff就可以吧，功能很强大的，而且很好用。
附上百科的解释：
http://baike.baidu.com/view/327446.htm

你可以按照你日期的格式获取年月日，然后用DateSerial(yyyy,m,d)来获取一个Date
接着就可以调用DateDiff求出日期差了
比如DateDiff("d", DateSerial(2012, 4, 21), DateSerial(2012, 5, 1))
返回10

[一根葱的无奈]

[Quote=引用 4 楼 的回复:]

用内置函数DateDiff就可以吧，功能很强大的，而且很好用。
附上百科的解释：
http://baike.baidu.com/view/327446.htm

你可以按照你日期的格式获取年月日，然后用DateSerial(yyyy,m,d)来获取一个Date
接着就可以调用DateDiff求出日期差了
比如DateDiff("d", DateSerial(2012, 4, 21),……
[/Quote]

就是这个，用的时候注意一下时间的差的类型，是分钟，秒........