day detector

by Leandro D. Pineda (1 Submission)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 4^th May 2005
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

day detector

API Declarations
dim holdday

Rate day detector



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

Download this snippet Add to My Saved Code

day detector Comments

No comments have been posted about day detector. Why not be the first to post a comment about day detector.

day detector

day detector Comments

Post your comment

Difficulty