28

我只想比较两个 VB.NET Date 对象的日期部分（而不是时间）。有没有办法做到这一点？

4

6 回答 6

64

只需通过Date属性获取每个日期部分并比较两者：

date1.Date.CompareTo(date2.Date)

或者：

If date1.Date < date2.Date Then
于 2009-03-06T13:39:18.630 回答
8

您也可以使用 TimeSpan

Dim ts As TimeSpan
ts = dt1 - dt2

ts.Days 现在将两个日期的差作为整天。

于 2009-03-06T14:44:28.753 回答
7

比较 DateTime.Date 属性。

于 2009-03-06T13:39:02.453 回答
6

将 txt1 日期更改为使用 dd/mm/yyyy 格式myDateTime.ToShortDateString()，以便两个日期的格式相同。然后 ：

if (DateTime.Compare(date1, date2) > 0) 
// which means ("date1 > date2")
if (DateTime.Compare(date1, date2) == 0) 
//which means ("date1 == date2");
if (DateTime.Compare(date1, date2) < 0) 
//which means ("date1 < date2");
于 2011-02-25T08:28:11.467 回答
0 
Dim backDateCount As Integer = DateDiff(DateInterval.Day, CDate(dtpCheckIn.SelectedDate.Value).Date, Date.Now.Date)

日期.现在.日期： #12/4/2018 12:00:00 AM#

日期。现在： #12/4/2018 03:23:34 PM#

于 2018-12-04T08:22:44.263 回答
-2 
Dim date1, date2 As Date
date1 = Date.Parse(dtpStart.Text)
date2 = Date.Parse(dtpEnd.Text)
If (DateTime.Compare(date1, date2) > 0) Then ' which means ("date1 > date2") 
    MessageBox.Show("يجب تحديد  الفترة للتاريخ بشكل صحيح  ", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, MessageBoxOptions.RtlReading)
    Exit Sub
End If
于 2012-06-25T10:56:39.280 回答