包含vb.net时间大小比较的词条

VB中怎样比较两个日期的大小

date1 = "2010-10-10 12:14"

date2 = "2011-2-3"

If DateDiff("d", CDate(date1), CDate(date2)) 0 Then

MsgBox date1 "大"

Else

MsgBox date2 "大"

End If

相关问答

Q1: VB.net窗体程序的time控件，可以识别到的最小时间差是多少纳秒 ?

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#) '还有几(整)秒

Q2: 怎样在vb中比较两个日期大小

日期比较其实直接比较2个字符串就行了

dim a as string

dim b as string

a="日期1"

b="日期2"

if ab then

msgbox("过期")

else

msgbox("没过期")

end if