DateAdd 函數 [物件：modDateTime 函式庫] 說明

說明

日期相加之副程式，目前不支援負數日期

本函數之引數列表

引數	型態	位元組	選項	預設值	說明
vYear	長整數	4	必須	(無)	輸入目標年之西元年份
vMonth	長整數	4	必須	(無)	輸入目標年之月份
vDay	長整數	4	必須	(無)	輸入目標年之日期
addDay	長整數	4	必須	(無)	輸入需增加之日數

傳回值

由引數傳回新的年、月、日

範例

Program Main

	Use modDateTime

	Integer :: vYear, vMonth, vDay

	vYear = 2000
	vMonth = 1
	vDay = 1

	Do i = 1, 36
		Call DateAdd(vYear, vMonth, vDay, 10)
		Write(*,*) vYear, vMonth, vDay
		Write(*,*) GetStageIndex(vYear, vMonth, vDay, SC_Month) ! 傳回月份
		Write(*,*) GetStageIndex(vYear, vMonth, vDay, SC_TenDays) ! 傳回當年第幾旬
		Write(*,*) GetStageIndex(vYear, vMonth, vDay, SC_Day) ! 傳回當年第幾日
	End Do

End Program

基本條件

Microsoft PowerStation 4.0 以後版本 | DateTime.f90

請參閱

modDateTime 函式庫 | GetMonthDays | GetStageIndex