表紙へ

VB.NET

日付の引き算

 

・以下の例は直接日付の値で計算しているが、変数を利用することももちろん可能。

・日付から何日(何ヶ月、何年)か前の日付を求めるには「日付の足し算」のサンプルで足す値をマイナスにする。

 

1.日付の差の日数を求める例


TextBox1.Text = #1/12/2005#.Subtract(#12/25/2004#).Days
 

この例では 2005/1/12 と 2004/12/25 の差を日数で求める。

 


TextBox1.Text = DateDiff(DateInterval.Day, #12/25/2004#, #1/12/2005#)
 

この例も上記の例と同じく2005/1/12 と 2004/12/25 の差を日数で求める。

 

 

2.日付の差の月数を求める例


TextBox1.Text = DateDiff(DateInterval.Month, #12/25/2004#, #1/12/2005#)
 

この例では月数の差は 1 となる。

1日(月の初めの日)を何回またいでいるかを数えている。

 

3.日付の差の年数を求める例


TextBox1.Text = DateDiff(DateInterval.Year, #12/25/2004#, #1/12/2005#)
 

この例では年数の差は 1 となる。

1月1日を何回またいでいるかを数えている。