Gambas Documentation

WeekDay

Rezultat = WeekDay ( Data AS Date ) AS Integer

Kthen ditën e javës të vlerës së Date .

Kthen një integer në mes 0 (E Diellë) dhe 6 (E shtunë) që përfaqëson ditën e javës për datën e argumentit .

Shiko Konstantat e paradefinuara për listën e konstantave të bashkuara me ditët e javës.

Example

PRINT Now; " -> "; DitëeJaës(Now)

05/16/2002 22:31:30 -> 4

IF DitëeJavës("6/8/2008") = 0 THEN
PRINT "It is a Sunday"
ELSE
PRINT "It is not a Sunday"
ENDIF

It is a Sunday

DIM EmriiDitës AS String[]
DIM D AS Date
DayNames = Split("Diellë Hënë Martë Mërkurë Enjte Premte Shtunë", " ")
D = "6/8/2008"
PRINT "Ishte një"; EmrateDitëve[WeekDay(D)]; " on "; Format$(D, "d mmm,yyyy")

It was a Sunday on 8 Jun,2008

' Ky shembull jep datat për të diellën e ardhshme
DIM D AS Date
D = ShtoDatën(Now, gb.day, 7 - WeekDay(Now))
PRINT "E Dialle e ardhshme bie më "; Format$(D, "d mmm,yyyy")

Example

See also