7

この VB.net コードが機能しない理由がわかりません。

私がやろうとしているのはif 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:301-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

4 に答える 4

9
"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

于 2013-03-04T06:59:35.940 に答える
2

これらの日付定数も期待どおりに機能し、プログラムの実行時にロケールの影響を受けません。

#3/4/2013 10:54:22# > #3/15/2013 12:23:30#

定数にはUSDateFormatを使用する必要があることを覚えておいてください。

于 2013-03-05T11:42:03.643 に答える