Year

Date Serial から、年を得ます。

構文:

declare function Year ( byval date_serial as double ) as long

用法:

#include "vbcompat.bi" result = Year ( date_serial )

パラメタ:

date_serial

日付。

戻り値:

Date Serial 形式の日付を格納する変数から、年を返します。

記述:

vbcompat.bi が含まれていないと、コンパイラは、この関数を認識しません。

例:

#include "vbcompat.bi"

Dim a As Double = DateSerial (2005, 11, 28) + TimeSerial (7, 30, 50)

Print Format(a, "yyyy/mm/dd hh:mm:ss "); Year(a)
Sleep

QBからの違い:

参照:

FreeBASIC Year