2014-01-08 4 views
0

날짜가 특정 범위 내에 있는지 확인해야합니다.날짜가 지정된 기간 내에 있는지 확인하십시오.

나는이 같은 것을보고 기능을 필요로한다고 가정

If Date.Now.ToString("dd/MM/yyyy") - 2 days <= sc3 <= Date.Now.ToString("dd/MM/yyyy") Then 
    sc3 = D 
    Console.WriteLine(D) 
End If 

그러나, 실제로 첫 번째 부분 (Date.Now.ToString("dd/MM/yyyy") - 2 days)에 대한 넣어 모르겠어요.

기본적으로 날짜가 현재 날짜와 2 일 사이인지 확인해야합니다.

+1

이 질문은 VBScript 또는 VB6에 대한 것입니까? 그들은 두 가지 다른 언어입니다. –

+0

그것은 VB.NET이 될 것 같지 않습니다. 완전히 대답을 변경합니다 ... – tcarvin

답변

1

귀하의 코드 예제는 (내가 당신의 VBScript를 태그를 믿고 선택) VB.NET. 시간을 무시

, 문제는이 같은 것입니다 :

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 

나는이를 확인 구문하지 못했지만, 당신이 시작할 수 있어야합니다.

3

와/실험을 이해하는 DateAddDateDiff에 대한 문서를 사용

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 

출력 :

-3 05.01.2014 False 
-2 06.01.2014 True 
-1 07.01.2014 True 
0 08.01.2014 True 
1 09.01.2014 False 
2 10.01.2014 False 
3 11.01.2014 False 

0
If Date.Now.AddDays(-2)<=sc3 AndAlso sc3<=Date.Now Then 
    sc3 = D 
    Console.WriteLine(D) 
End If 
관련 문제