.net 检查日期是否在给定的时间范围内

.net 检查日期是否在给定的时间范围内,.net,vb.net,datetime,.net,Vb.net,Datetime,我需要检查一个日期是否在某个范围内 我想我需要这样的函数: If Date.Now.ToString("dd/MM/yyyy") - 2 days <= sc3 <= Date.Now.ToString("dd/MM/yyyy") Then sc3 = D Console.WriteLine(D) End If Dim testDate As DateTime = new DateTime(2014, 1,1) Dim currDate As DateTime

我需要检查一个日期是否在某个范围内

我想我需要这样的函数:

If Date.Now.ToString("dd/MM/yyyy") - 2 days <= sc3 <= Date.Now.ToString("dd/MM/yyyy") Then
     sc3 = D
     Console.WriteLine(D)
End If
Dim testDate As DateTime = new DateTime(2014, 1,1)
Dim currDate As DateTime = DateTime.Now.Date

If testDate <= currDate AndAlso testDate >= currDate - TimeSpan.FromDays(2) Then

'within range

End If 
If Date.Now.ToString(“dd/MM/yyyy”)-2天使用文档了解/试验:

Option Explicit

Dim dtToday : dtToday = Date
Dim nDiff
For nDiff = -3 To +3
    Dim dtTest : dtTest = DateAdd("d", nDiff, dtToday)
    Dim nDiff2 : nDiff2 = DateDiff("d", dtToday, dtTest)
    Dim bInR   : bInR   = -2 <= nDiff2 And 0 >= nDiff2 ' depends on your understand of "berween"
    WScript.Echo nDiff, dtTest, CStr(bInR)
Next
(我选择相信你的VBScript标签)

使用文档了解/体验:

Option Explicit

Dim dtToday : dtToday = Date
Dim nDiff
For nDiff = -3 To +3
    Dim dtTest : dtTest = DateAdd("d", nDiff, dtToday)
    Dim nDiff2 : nDiff2 = DateDiff("d", dtToday, dtTest)
    Dim bInR   : bInR   = -2 <= nDiff2 And 0 >= nDiff2 ' depends on your understand of "berween"
    WScript.Echo nDiff, dtTest, CStr(bInR)
Next

(我选择相信你的VBScript标签)

你的代码示例是VB.NET

忽略时间,这将是这样的:

If Date.Now.ToString("dd/MM/yyyy") - 2 days <= sc3 <= Date.Now.ToString("dd/MM/yyyy") Then
     sc3 = D
     Console.WriteLine(D)
End If
Dim testDate As DateTime = new DateTime(2014, 1,1)
Dim currDate As DateTime = DateTime.Now.Date

If testDate <= currDate AndAlso testDate >= currDate - TimeSpan.FromDays(2) Then

'within range

End If 
Dim testDate As DateTime=新日期时间(2014,1,1)
Dim currDate As DateTime=DateTime.Now.Date
如果testDate=currDate-TimeSpan.FromDays(2),则
"在射程之内",
如果结束

我没有检查语法,但它应该可以让您开始使用。

您的代码示例是VB.NET

If Date.Now.AddDays(-2)<=sc3 AndAlso sc3<=Date.Now Then
    sc3 = D
    Console.WriteLine(D)
End If
忽略时间,这将是这样的:

If Date.Now.ToString("dd/MM/yyyy") - 2 days <= sc3 <= Date.Now.ToString("dd/MM/yyyy") Then
     sc3 = D
     Console.WriteLine(D)
End If
Dim testDate As DateTime = new DateTime(2014, 1,1)
Dim currDate As DateTime = DateTime.Now.Date

If testDate <= currDate AndAlso testDate >= currDate - TimeSpan.FromDays(2) Then

'within range

End If 
Dim testDate As DateTime=新日期时间(2014,1,1)
Dim currDate As DateTime=DateTime.Now.Date
如果testDate=currDate-TimeSpan.FromDays(2),则
"在射程之内",
如果结束

我没有进行语法检查,但应该可以开始了。

If Date.Now.AddDays(-2)
If Date.Now.AddDays(-2)这个问题是关于VBScript还是VB6的?它们是两种不同的语言。两者都不是,看起来都是VB.NET,这完全改变了答案……这个问题是关于VBScript还是VB6的?它们是两种不同的语言。两者都不是,看起来都是VB.NET,这完全改变了答案。。。
If Date.Now.AddDays(-2)<=sc3 AndAlso sc3<=Date.Now Then
    sc3 = D
    Console.WriteLine(D)
End If