Question

vb时间差

我需要一个求时间差的程序，哪位高手帮帮忙？具体如下：
比如提取系统日期与时间，用label控件caption属性显示。求输入一个日期时间后，再用一个label控件显示两个时间相差的秒数（分钟数，小时数，天数。这些可以选择一个），同时可以显示“倒计时”和“累加时间”的方式。注意的是有时间和日期
最好是源码，我是一只笨鸟，呵呵！！！

Answer 1

VB有现成的函数：
DateDiff(格式,日期1,日期2)
如今天到2010-5-1 8:00:00的时间差，代码：
DateDiff("yyyy",Now,#2010-5-1 8:00:00#) '还有几(整)年
DateDiff("q",Now,#2010-5-1 8:00:00#) '还有几(整)季度
DateDiff("m",Now,#2010-5-1 8:00:00#) '还有几(整)月
DateDiff("d",Now,#2010-5-1 8:00:00#) '还有几(整)天
DateDiff("ww",Now,#2010-5-1 8:00:00#) '还有几(整)周
DateDiff("h",Now,#2010-5-1 8:00:00#) '还有几(整)小时
DateDiff("n",Now,#2010-5-1 8:00:00#) '还有几(整)分钟
DateDiff("s",Now,#2010-5-1 8:00:00#) '还有几(整)秒