Collabora Office 24.04 Bantuan
Returns a Date value for a specified year, month, and day.
DateSerial (tahun, bulan, hari)
Tanggal
Tahun: Ekspresi bilangan bulat yang menunjukkan satu tahun. Semua nilai antara 0 dan 99 ditafsirkan sebagai tahun 1900-1999. Untuk tahun yang berada di luar rentang ini, Anda harus memasukkan keempat digit bilangan.
Bulan: Ekspresi integer yang menunjukkan bulan pada tahun tertentu. Rentang yang diterima adalah dari 1-12.
Day: Ekspresi bilangan bulat yang menunjukkan hari pada bulan yang ditentukan. Kisaran yang diterima adalah dari 1-31. Tidak ada galat yang dikembalikan ketika Anda memasukkan hari yang tidak ada selama sebulan lebih pendek dari 31 hari.
FungsiDateSerial mengembalikan jumlah hari antara 30 Desember 1899 dan tanggal yang diberikan. Anda dapat menggunakan fungsi ini untuk menghitung perbedaan antara dua tanggal.
Fungsi DateSerial mengembalikan tipe data Varian dengan VarType 7 (Tanggal). Secara internal, nilai ini disimpan sebagai nilai ganda, sehingga ketika tanggal yang diberikan adalah 1.1.1900, nilai yang dikembalikan adalah 2. Nilai negatif sesuai dengan tanggal sebelum 30 Desember 1899 (tidak termasuk).
Jika tanggal ditentukan yang berada di luar rentang yang diterima, Collabora Office muncul pesan galat.
Jika Anda mendefinisikan fungsi DateValue sebagai string yang berisi tanggal, Fungsi DateSerial mengevaluasi setiap parameter (tahun, bulan, hari) sebagai ekspresi numerik yang terpisah.
Sub ExampleDateSerial
Dim lDate As Long
Dim sDate As String
lDate = DateSerial(1964, 4, 9)
sDate = DateSerial(1964, 4, 9)
msgbox lDate REM menghasilkan 23476
msgbox sDate REM menghasilkan 04/09/1964
End Sub