Mengenal Penggunakan WeekDay Untuk Mengenali Nama Hari Tiap Tanggal (Date) ~Tutorial Gambas

Perintah WeekDay digunakan untuk mengenali hari tiap tanggal saat menggunakan Date/Now.

Pada dasarnya WeekDay merupakan nilai kembalian yang berupa angka (integer) yang jumlahnya sama dengan jumlah hari (7 hari / Senin – Minggu) yang mana angka tersebut dimulai dari 0 sampai dengan 6 yang bisa digunakan untuk mewakili hari suatu tanggal.

Secara umum pengenalan hari menggunakan (nilai) WeekDay sebagai berikut:

WeekDay(Now) = 0 = Ahad

WeekDay(Now) = 1 = Senin

WeekDay(Now) = 2 = Selasa

WeekDay(Now) = 3 = Rabu

WeekDay(Now) = 4 = Kamis

WeekDay(Now) = 5 = Jum’at

WeekDay(Now) = 6 = Sambtu

Rumus WeekDay: WeekDay(Date as Date) As Integer

Contoh dasar:

‘Gambas modul file

Public Sub Main()

   Print WeekDay(Now)

   ‘Jika “Now” adalah tanggal “03/03/2020” maka hasilnya = 2 (selasa)

  Print WeekDay(“03/04/2020”)

   ‘Hasilnya = 3 (rabu). Ingat format dasar Date adalah mm/dd/yyyy (bulan/hari/tahun)

   ‘03 (bulan), 04 (hari), 2020 (tahun)

   Print WeekDay(“03/05/2020”)

   ‘hasilnya = 4 (kamis)

End

Contoh penerapan pada program

‘Gambas modul file

Public Sub Main()

   Dim NamaHari As String[]

   Dim Tanggal As Date

   NamaHari = [“Minggu”, “Senin”, “Selasa”, “Rabu”, “Kamis”, “Jumat”, “Sabtu”]

   Tanggal = “03/05/2020”

   ‘Kalau di Indonesia fomatnya 05/03/2020 (hh/bb/tttt)

   Print "Ini adalah Hari " & NamaHari[WeekDay(Tanggal)] & " Tanggal " & Format(Tanggal, "dd/mm/yyyy")

End

Hasil: Ini adalah Hari Kamis Tanggal 05/03/2020

Format tanggal:

d = day = hari

m = mounth = bulan

t = year = tahun