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 yang dapat mewakili tanggal. Jika tanggal berisi Null, Null akan dikembalikan.
Catatan
Jika pengaturan properti Calendar adalah Gregorian, bilangan bulat yang dikembalikan mewakili tahun Gregorian untuk argumen tanggal. Jika kalender adalah Hijriah, bilangan bulat yang dikembalikan mewakili tahun Hijriah untuk argumen tanggal. Untuk tanggal Hijriah, nomor argumen adalah ekspresi numerik apa pun yang dapat mewakili tanggal dan/atau waktu dari 1/1/100 (Gregorian 2 Agustus 718) hingga 4/3/9666 (Gregorian 31 Desember 9999).
Contoh kueri
| Ekspresi | Hasil |
|---|---|
| PILIH DateofSale, Year([DateofSale]) SEBAGAI Expr1 DARI ProductSales; | Mengembalikan nilai dari bidang "DateofSale" dan angka yang mewakili 'Tahun' dari nilai tanggal ini. |
| PILIH Tahun(#10/10/2018#) SEBAGAI TahunUji DARI ProductSales; | Mengembalikan angka yang mewakili 'Tahun' dari 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 tertentu. Dalam lingkungan pengembangan, tanggal literal 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.