Year Function
DateSerial ๋๋ DateValue ํจ์๋ฅผ ์ฌ์ฉํ์ฌ ์์ฑํ ์ฐ์ ๋ ์ง ๋ฒํธ์์ ์ฐ๋๋ฅผ ๊ตฌํฉ๋๋ค.
๊ตฌ๋ฌธ:
Year (Number)
๋ฐํ ๊ฐ:
Integer
๋งค๊ฐ ๋ณ์:
Number: ์ฐ๋๋ฅผ ๊ณ์ฐํ๋ ๋ฐ ์ฌ์ฉ๋๋ ์ฐ์ ๋ ์ง ๋ฒํธ๋ฅผ ํฌํจํ๋ ์ ์ ์์ ๋๋ค.
์ด ํจ์๋ DateSerial ํจ์์ ๋ฐ๋๋๋ ๊ฒ์ผ๋ก, ์ฐ์ ๋ ์ง์ ์ฐ๋๋ฅผ ๊ตฌํฉ๋๋ค. ์๋ฅผ ๋ค์ด,
Print Year(DateSerial(1994, 12, 20))
๊ฐ 1994๋ฅผ ๊ตฌํฉ๋๋ค.
์:
Sub ExampleYear
MsgBox "" & Year(Now) ,64,"Current year"
End Sub