Contoh deskripsi sintaksis fungsi
Now Now() Mendapatkan tanggal dan waktu saat ini dari sistem Dim MyVar MyVar = Sekarang
'' MyVar berisi tanggal dan waktu saat ini.
Tanggal Tanggal() Mendapatkan tanggal saat ini dari sistem Dim MyDate MyDate = Tanggal
'' MyDate berisi tanggal sistem saat ini.
Time Time() mendapatkan waktu sistem saat ini Dim MyTime MyTime = Time
'' Mengembalikan waktu sistem saat ini.
Tahun Tahun(Tanggal) Mendapatkan tahun pada tanggal tertentu Redupkan Tanggal Saya, Tahun Saya
Tanggal Saya = #19 Oktober 1962#
Contoh deskripsi sintaksis fungsi
Now Now() Mendapatkan tanggal dan waktu saat ini dari sistem Dim MyVar MyVar = Sekarang
'' MyVar berisi tanggal dan waktu saat ini.
Tanggal Tanggal() Mendapatkan tanggal saat ini dari sistem Dim MyDate MyDate = Tanggal
'' MyDate berisi tanggal sistem saat ini.
Time Time() mendapatkan waktu sistem saat ini Dim MyTime MyTime = Time
'' Mengembalikan waktu sistem saat ini.
Tahun Tahun(Tanggal) Mendapatkan tahun pada tanggal tertentu Redupkan Tanggal Saya, Tahun Saya
Tanggal Saya = #19 Oktober 1962#
'' Tetapkan tanggal.
Tahunku = Tahun(Tanggalku)
'' Tahunku berisi tahun 1962.
Bulan Bulan(Tanggal) Mendapatkan bulan pada tanggal tertentu Dim MyVar MyVar = Bulan(Sekarang)
'' MyVar berisi nomor yang sesuai dengan bulan ini.
Hari Hari(Tanggal) Dapatkan tanggal pada tanggal yang ditentukan Redupkan MyDay MyDay = Hari("19 Oktober 1962")
''Hariku berisi 19.
Hour Hour(time) Mendapatkan jam pada waktu tertentu Redupkan MyTime, MyHour
MyTime = Sekarang MyHour = Jam(MyTime)
'' MyHour berisi nilai numerik yang mewakili waktu saat ini.
Menit Menit(waktu) Mendapatkan menit dari waktu tertentu Redupkan MyVar
MyVar = Menit (Sekarang)
Detik Detik(waktu) Dapatkan jumlah detik waktu menonton Redupkan MySec
MySec = Kedua (Sekarang)
''MySec berisi angka yang mewakili detik saat ini.
WeekDay WeekDay(Date) Mendapatkan bilangan bulat hari dalam seminggu untuk tanggal tertentu, 1 berarti Minggu, 2 berarti Senin, dan seterusnya Dim MyDate, MyWeekDay
Tanggal Saya = #19 Oktober 1962#
'' Tanggal penugasan
Hari Minggu Saya = Hari Kerja (Tanggal Saya)
'' MyWeekDay berisi 6, MyDate mewakili hari Jumat
DateDiff DateDiff("Var",Var1,Var2)
Var: faktor interval tanggal atau waktu, dengan parameter sebagai berikut:
yyyy tahun m bulan d hari ww minggu h jam s kedua Var1: tanggal atau waktu pertama
Var2: Tanggal atau waktu kedua, setelah Var1, menghitung interval antara dua tanggal atau waktu DateDiff("d",Date(),#1/1/2005#)
''Kembalikan berapa hari yang tersisa sampai Tahun Baru 2005
DateDiff("h",Tanggal(),#1/1/2005#)
''Kembalikan berapa jam yang tersisa hingga Hari Tahun Baru 2005
DateDiff("d",#1/1/2003#,#1/1/2005#)
''Mengembalikan jumlah hari antara dua tanggal
TanggalTambah TanggalDiff("Var",Var1,Var2)
Var: faktor interval tanggal atau waktu:
Var1: Kelipatan interval tanggal atau waktu
Var2: Dasar tanggal atau waktu. Tambahkan dua tanggal atau waktu. Contoh berikut menambahkan satu bulan ke 31 Januari 1995:
NewDate = DateAdd("m", 1, "31-Jan-95")
Dalam contoh ini, DateAdd mengembalikan 28 Februari 1995, bukan 31 Februari 1995. Jika tanggalnya 31 Januari 1996, maka tanggal 29 Februari 1996 dikembalikan karena tahun 1996 adalah tahun kabisat.
Jika tanggal perhitungan sebelum tahun 100 M, akan terjadi kesalahan.
FormatDateTime FormatDateTime(Date,vbShortDate) Konversikan ke format tanggal pendek FromatDateTime(Date(),vbLongDate)
"Tampilan dalam format tanggal panjang
FormatDateTime(Date,vbLongDate) Konversikan ke format tanggal panjang
FormatDateTime(Date,vbShortTime) Konversikan ke format waktu singkat
FormatDateTime(Date,vbLongTime) Konversikan ke format waktu lama