Year Function
DateSerial āĻ āĻĨāĻŦāĻž DateValue āĻĢāĻžāĻāĻļāĻ¨ āĻĻā§āĻŦāĻžāĻ°āĻž āĻĒā§āĻ°āĻāĻžāĻļāĻŋāĻ¤ āĻā§āĻ°āĻŽāĻŋāĻ āĻ¤āĻžāĻ°āĻŋāĻ āĻĨā§āĻā§ āĻŦāĻāĻ° āĻĒā§āĻ°āĻĻāĻžāĻ¨ āĻāĻ°ā§āĨ¤
āĻ¸āĻŋāĻ¨āĻā§āĻ¯āĻžāĻā§āĻ¸:
āĻŦāĻāĻ° (āĻ¸āĻāĻā§āĻ¯āĻž)
āĻĒā§āĻ°āĻĻāĻžāĻ¨ āĻŽāĻžāĻ¨:
Integer
āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻāĻžāĻ°:
āĻā§āĻ°āĻŽ: āĻāĻ¨āĻāĻŋāĻāĻžāĻ° āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨ āĻ¯āĻž āĻŦāĻāĻ° āĻāĻŖāĻ¨āĻž āĻāĻ°āĻžāĻ° āĻāĻ¨ā§āĻ¯ āĻŦā§āĻ¯āĻŦāĻšā§āĻ¤ āĻā§āĻ°āĻŽāĻŋāĻ āĻ¤āĻžāĻ°āĻŋāĻ āĻ¸āĻāĻā§āĻ¯āĻž āĻ§āĻžāĻ°āĻŖ āĻāĻ°ā§ āĻĨāĻžāĻā§āĨ¤
āĻāĻ āĻĢāĻžāĻāĻļāĻ¨āĻāĻŋ DateSerial āĻĢāĻžāĻāĻļāĻ¨ā§āĻ° āĻŦāĻŋāĻĒāĻ°ā§āĻ¤ āĻāĻŦāĻ āĻāĻāĻāĻŋ āĻā§āĻ°āĻŽāĻŋāĻ āĻ¤āĻžāĻ°āĻŋāĻā§āĻ° āĻŦāĻāĻ° āĻĒā§āĻ°āĻĻāĻžāĻ¨ āĻāĻ°ā§ āĻĨāĻžāĻā§āĨ¤ āĻ¯ā§āĻŽāĻ¨, āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨āĻāĻŋ:
Print Year(DateSerial(1994, 12, 20))
āĻŽāĻžāĻ¨ ā§§ā§¯ā§¯ā§Ē āĻĒā§āĻ°āĻĻāĻžāĻ¨ āĻāĻ°ā§āĨ¤
āĻāĻĻāĻžāĻšāĻ°āĻŖ:
Sub ExampleYear
MsgBox "" & Year(Now) ,64,"Current year"
End Sub