• Home
 · 
• Miscellaneous
 · 
• day detector

day detector

day detector

API Declarations


dim holdday



Rate day detector

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

holdday = weekday(now)
if holdday = 1 then
araw = "Sunday"
elseif holdday = 2 then 
araw = "Monday"
elseif holdday = 3 then
araw = "Tuesday"
elseif holdday = 4 then
araw = "Wednesday"
elseif holdday = 5 then
araw = "Thursday"
elseif holdday = 6 then
araw = "Friday"
elseif holdday = 7 then
araw = "Saturday"
endif

for1.caption = now & "[" & araw & "]"

end sub