如何只比较日期部分而不是两个日期的时间？答案

【问题标题】：How to compare just the date part and not the time of two Dates?如何只比较日期部分而不是两个日期的时间？
【发布时间】：2009-03-06 13:37:08
【问题描述】：

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

【问题讨论】：

标签： vb.net date compare

【解决方案1】：

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

date1.Date.CompareTo(date2.Date)

或者：

If date1.Date < date2.Date Then

【讨论】：

我会删除关于它的文字。只是对于任何跟随的人来说，康拉德的评论在当时是有道理的:)
谢谢贾里德。当我回答 VB 问题时，几乎总是涉及到一些语法猜测:)

【解决方案2】：

你也可以使用 TimeSpan

Dim ts As TimeSpan
ts = dt1 - dt2

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

【讨论】：

只是想补充一下我经常使用的 (dt1-dt2).Days 作为快速差异。
正是我想要的！谢谢！

【解决方案3】：

比较 DateTime.Date 属性。

【讨论】：

【解决方案4】：

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

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");

【讨论】：

【解决方案5】：

Dim backDateCount As Integer = DateDiff(DateInterval.Day, CDate(dtpCheckIn.SelectedDate.Value).Date, Date.Now.Date)

Date.Now.Date: #12/4/2018 12:00:00 AM#

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

【讨论】：

【解决方案6】：

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

【讨论】：