1,011 バイト追加
、 2020年2月15日 (土) 07:36
==有効期間に含まれるデータを判定==
[VB]{{category ロジック}}
有効期間[開始日(sd)~終了日(ed)]を持つデータに対し、
ある範囲[開始日(tsd)~終了日(ted)]に有効か否かを判定する。
概念図
'
' tsd ted
' |-------------------------| ' 対象範囲
' ' --- 生存範囲
' sd ed sd ed ' === 該当範囲
'1:+---====+ 2:+===------+
' sd ed
' 3:+==============+
' sd ed
'4:+---==========================----+
'
'
判定
If ( tsd <= ed And ed <= ted ) _ 'data 1, data 3
Or ( tsd <= sd And sd <= ted ) _ 'data 2, data 3
Or ( sd <= tsd And ted <= ed ) Then 'data 4
' 有効範囲にあるデータ
End If
SQL
sd between tsd and ted
or ed between tsd and ted
or tsd between sd and ed
or ted between sd and ed