关于vb中日期计算问题

[qianyu9880]

我首先从数据库的某一字段中取出:以前的某一日期，再用系统日期减去这个日期,想得到这两个日期相差的天数该怎么做？( 用减法不对）
olddate=rs.fields("tran_date").value
nowdate=format(date,"yyyymmdd")
急盼望好心人指点！

[canyqf]

就用减法啊，怎么不可以呢？
试试msgbox cdate(olddate)-cdate(nowdate)就知道了。

[pcwak]

减法

[hnwlf]

天数=abs(datediff("d",olddate,now))

[macwong]

试验过了，
是可以的，
但是日期类型要确定支持哪一种，
否则可能会出现类型不匹配的情况。

[qianyu9880]

我的olddate 和nowdate应定义为什么类型的？

[qianyu9880]

我的qq:121682789，email:[e-mail].
不知哪位高手愿意告诉我你的联系方式。 因为这个问题有点急。
我照第一位的回复试了一下，提示：类型不匹配，不知我的olddate和nowdate应定义为什么类型？

[落伍者]

用datediff来求两个日期相差的天数
date数据类型可以。
cdate(olddate)-cdate(nowdate)是不完全的。
你可以实验一下。
这是由于由于date类型数据的存储方式造成的

[qianyu9880]

如果我的nowdate是从文本框中得到，即nowdate=text1.text,这样赋值对不对？

[qianyu9880]

dim x as integer
dim olddate as date
text1.text为用户输入的日期如：20030408
x=datediff("d",text1.text,olddate)
还是提示类型不匹配