close
--利用TimeSpan來相減
Dim diff As TimeSpan
diff = New System.TimeSpan(4 , 0, 0, 0) --要定義成這樣才能使用，4表示會加或減四日
Dim date1 as datetime = date.Now.Add(diff) --加四日
Dim date2 as datetime = Today.Subtract(diff).date --減四日
Dim diff1 As TimeSpan --記錄兩日期相加減後的天數
diff1 = date2.Subtract(date1)
response.write(diff1.tostring) --印出兩日期相差的天數
--利用日期格式來相減
Response.Write("===" & Today.Subtract("2007-12-26").Days) --今天是１２／２７日，所以會印出１
Dim diff As TimeSpan
diff = New System.TimeSpan(4 , 0, 0, 0) --要定義成這樣才能使用，4表示會加或減四日
Dim date1 as datetime = date.Now.Add(diff) --加四日
Dim date2 as datetime = Today.Subtract(diff).date --減四日
Dim diff1 As TimeSpan --記錄兩日期相加減後的天數
diff1 = date2.Subtract(date1)
response.write(diff1.tostring) --印出兩日期相差的天數
--利用日期格式來相減
Response.Write("===" & Today.Subtract("2007-12-26").Days) --今天是１２／２７日，所以會印出１
全站熱搜
留言列表
