VB.NET时间区间判断IF条件正确性排查求助

首先，你的IF条件逻辑存在明显漏洞，导致它无法准确匹配你预期的时间段。咱们先拆解原代码的逻辑：

Dim dt As DateTime, hh As Integer, mm As Integer 
dt = DateTime.Now 
hh = dt.Hour 
mm = dt.Minute 
If ((hh > 00 Or mm > 30) And (hh <= 9 Or mm < 30 )) Then 
    ' 调用存储过程的代码
End if

原条件的核心问题 #

这个逻辑会误判大量不符合预期的时间，举两个典型反例：

• 当时间是9:40时：hh <=9为True，所以第二个括号(hh <=9 Or mm <30)整体为True；同时第一个括号hh>00为True，最终整个条件成立，但9:40显然不在你大概率期望的「00:30到9:30」区间内。
• 当时间是00:20时：虽然第一个括号(hh>00 Or mm>30)为False（符合预期），但如果你的目标是排除00:00-00:30，原逻辑并不能准确覆盖边界——比如00:30整时，mm>30为False，hh>00也为False，第一个括号结果为False，会错误地跳过这个时间点。

正确的写法（假设你想判断时间在00:30 到 09:30之间） #

推荐用更直观的时间区间判断方式，避免拆分小时和分钟的复杂逻辑：

方法1：通过总分钟数比较

把当前时间转换成一天内的总分钟数，直接做数值对比：

Dim currentTime As DateTime = DateTime.Now
Dim totalMinutes As Integer = currentTime.Hour * 60 + currentTime.Minute
' 00:30对应30分钟，09:30对应570分钟
If totalMinutes >= 30 AndAlso totalMinutes < 570 Then
    ' 调用存储过程的代码
End If

方法2：直接对比TimeOfDay属性

利用DateTime的TimeOfDay属性，直接和目标时间段的TimeSpan对比：

Dim currentTime As DateTime = DateTime.Now
Dim startTime As TimeSpan = New TimeSpan(0, 30, 0) ' 00:30:00
Dim endTime As TimeSpan = New TimeSpan(9, 30, 0)   ' 09:30:00

If currentTime.TimeOfDay >= startTime AndAlso currentTime.TimeOfDay < endTime Then
    ' 调用存储过程的代码
End If

补充说明 #

原逻辑的问题在于用Or拆分小时和分钟的判断，导致两个条件的交集出现了超出预期的范围。比如当小时为9时，只要hh<=9成立，不管分钟是多少，第二个括号都会为True，最终错误包含9:30到9:59的时间。用整体时间区间的方式判断，逻辑更清晰也更不容易出错。

内容的提问来源于stack exchange，提问作者Krishna508