Question

VB中怎样算出两日期之差，ACCESS数据库，VS2008.情况是这样的，我用的DateTimePicker1选日期，

Answer 1

可以用DateDiff函数，如DateDiff("d", Date1, date2)，如果date1或date2不是标准的日期型可用Format转化，如DateDiff("d", format(Date1,"yyyy-mm-dd"), format(Date2,"yyyy-mm-dd"))

Answer 2

dim a as date,b as date,c as long
a=cdate("2011-1-2")
b=cdate("2012-12-3")
c=b-a
msgbox c

追问

要是日期是变的呢 从表中取出的日期 提示错误
错误 1 类型“System.TimeSpan”的值无法转换为“Date”。

追答

变得也一样啊，除非你日期的格式不正确