大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
你好,VB6中时间大小比较(使用DateDiff函数)。比如:DateDiff("d",d1,d2)0:表示d1d2(d1的时间晚于d2)。否则就是早于d2。如果等于0表示日期时间完全相等。具体参考(点击, ,查看)。
成都创新互联-专业网站定制、快速模板网站建设、高性价比高明网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式高明网站制作公司更省心,省钱,快速模板网站建设找我们,业务覆盖高明地区。费用合理售后完善,十年实体公司更值得信赖。
日期比较其实直接比较2个字符串就行了
dim a as string
dim b as string
a="日期1"
b="日期2"
if ab then
msgbox("过期")
else
msgbox("没过期")
end if
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