Mengembalikan Varian (Bilangan Bulat) yang berisi bilangan bulat yang mewakili tahun.
Sintaks
Tahun(tanggal)
Argumen tanggalyang diperlukan adalah Varian, ekspresi numerik, ekspresi string, atau kombinasi apa pun dari ini yang dapat mewakili tanggal. Jika tanggal berisi Null, Null dikembalikan.
Catatan
Jika pengaturan properti Calendar adalah Gregorian, bilangan bulat yang dikembalikan mewakili tahun Gregorian untuk argumen tanggal. Jika kalender adalah Hijriyah, bilangan bulat yang dikembalikan mewakili tahun Hijriah untuk argumen tanggal. Untuk tanggal Hijriah, nomor argumen adalah ekspresi numerik apa pun yang bisa menyatakan tanggal dan/atau waktu dari 1/1/100 (Gregorian Agu 2, 718) hingga 4/3/9666 (Gregorian Des 31, 9999).
Contoh kueri
| Ekspresi | Hasil |
|---|---|
| SELECT DateofSale, Year([DateofSale]) AS Expr1 FROM ProductSales; | Mengembalikan nilai dari bidang "DateofSale" dan angka yang mewakili 'Tahun' dari nilai tanggal ini. |
| SELECT Year(#10/10/2018#) AS YearTest FROM ProductSales; | Mengembalikan angka yang mewakili 'Tahun' string "10/10/2018". Hasil: 2018. |
Contoh VBA
Catatan
Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.
Contoh ini menggunakan fungsi Year untuk mendapatkan tahun dari tanggal yang ditentukan. Dalam lingkungan pengembangan, literal tanggal ditampilkan dalam format tanggal pendek menggunakan pengaturan lokal kode Anda.
Dim MyDate, MyYear
MyDate = #February 12, 1969# ' Assign a date.
MyYear = Year(MyDate) ' MyYear contains 1969.