Fungsi WeekdayName [VBA]

Fungsi WeekdayName mengembalikan nama hari kerja pada hari tertentu dalam sepekan.

warning

This constant, function or object is enabled with the statement Option VBASupport 1 placed before the executable program code in a module.


Sintaksis:


        WeekdayName(Weekday as Integer [,Abbreviate as Boolean [,FirstDayofWeek as Integer]])
    

Nilai balikan:

String

Parameter:

Hari Kerja: Nilai dari 1 hingga 7, Senin sampai Minggu, Nama Hari Minggunya perlu dihitung.

Singkatan: Pilihan. Nilai Boolean yang menunjukkan apakah nama hari kerja akan disingkat.

FirstDayofWeek: Pilihan. Menentukan hari pertama dalam sepekan.

Hari pertama dalam Pekan:

Dinamakan konstan

Nilai

Keterangan

vbUseSystemDayOfWeek

0

Gunakan API National Language Support (NLS)

vbSun­day

1

Minggu (baku)

vbMonday

2

Senin

vbTuesday

3

Selasa

vbWednesday

4

Rabu

vbThursday

5

Kamis

vbFriday

6

Jumat

vbSaturday

7

Sabtu


Kode kesalahan:

Tak ada

Contoh:


        REM  *****  BASIC  *****
        Option VBASupport 1
        Sub Example_WeekdayName
         Dim tgf as Integer
         tgf = 6
         print tgf &" "& WeekdayName(tgf,False,vbSunday)
        End Sub
    

Mohon dukung kami!