【发布时间】:2015-04-26 16:06:58
【问题描述】:
我想比较两个 DateTimePicker 的值
Dim dd1 As Date, dd2 As Date
Dim diff As Integer
dd1 = DateTimePicker1.Value
dd2 = DateTimePicker2.Value
diff = DateDiff("d", dd1, dd2)
If diff > 0 Then
MsgBox("datetimpicker1datetimepicker2")
End If
但它不起作用,请你帮帮我
【问题讨论】:
-
你说的不起作用是什么意思?
-
请记住,如果第一个日期晚于第二个日期,DateDiff 将返回一个负数,这意味着您的 MsgBox 将不会显示。