将组合框日期与可数据框进行比较

Question

我的比较与我之前做过的组合框和数据表中的值之间的通常比较略有不同。我比较了字符串。

但在这种情况下，如果组合框中选择的日期是 2018 年 1 月 1 日；我需要检查数据表中的第一个日期（在日期列中）是否是 2018 年 1 月 2 日。如果数据表中的日期不是组合框中所选日期的一天后，它应该会产生错误，弹出错误或类似的东西。

验证将在组合框中的内容之后 1 天进行。

有没有比较特定日期之后的日期的方法？日期+1？像这样的东西？

Answer 1

您可以将两个日期相互比较（请参阅DateTime。结果将是具有Days 属性的TimeSpan 对象，您可以检查它是否为1。

Dim day1 As New Date(2008, 1, 1)
Dim day2 As New Date(2008, 1, 2)

Dim result As TimeSpan = day2 - day1

Console.WriteLine("Number of Days: {0}", result.Days)

您的另一个选择是从组合框中获取日期并为其添加一天，然后检查日期是否相等。为此，您可以使用AddDays 方法。

Dim day1 As New Date(2008, 1, 1)
Dim day2 As Date = day1.AddDays(1)

编辑
既然您询问了从字符串中解析的问题。您需要使用Date 解析函数（Parse 或TryParse）。

Dim date1 As Date
If Date.TryParse("2018-05-18", date1) Then
    Console.WriteLine("Date is {0}", date1)
Else
    Console.WriteLine("Couldn't parse")
End If

所以重写上面的例子我们会得到这样的结果：

Dim day1 As Date

If Date.TryParse(comboBox.Text, day1) Then
    Dim dayPlus1 As Date = day1.AddDays(1)
    ' Compare with your database date here
Else
    'Handle the error case here
End If