vb.net – 查找日期是否超过另一个日期

来源：互联网收集：自由互联发布时间：2021-06-24

我无法弄清楚为什么这个VB.net代码不起作用.. 我想要做的是如果value1 value2然后显示一个消息框说明已过期,否则显示消息框说未过期. If "4-3-13 10:54:22" "15-3-13 12:23:30" Then MsgBox("Expired")Els

我无法弄清楚为什么这个VB.net代码不起作用..

我想要做的是如果value1> value2然后显示一个消息框说明已过期,否则显示消息框说未过期.

If "4-3-13 10:54:22" > "15-3-13 12:23:30" Then
    MsgBox("Expired")
Else
    MsgBox("Not Expired")
End If

每次它出现说过期甚至知道它不应该.

当我从15-3-13 12:23:30更改为1-3-13 12:23:30它仍然说过期了.

如果我将我的代码更改为：

If "4-3-13 10:54:22" < "15-3-13 12:23:30" Then
    MsgBox("Not Expired")
Else
    MsgBox("Expired")
End If

它仍然返回错误.

我如何做到这样：

DATE1 = 4-3-13 10:54:22

DATE2 = 15-3-13 12:23:30


IF DATE1 > DATE2 THEN
   Expired
else
   Not Expired

应该返回“未过期”

任何人都能帮忙..我不能工作吗？

"4-3-13 10:54:22" > "15-3-13 12:23:30" 
'This condition states that you are comaparring strings not date

为了得到你想象的结果,这样做,

cdate("4-3-13 10:54:22") > cdate("15-3-13 12:23:30")
'Convert the strings into date and then compare it.

CDATE

相关文章