Name Of Day

Get Name of Day Function

How can you find out what the day name is for a given date? This function will return that value in a string if passed a date in the format dd/mm/yyyy.

[code format="qbasic"]

 print dayname$("10/1/1998") dayname$("10/1/1998") 
 
 function dayname$(dt$) 
 days$ = "Tuesday "Tuesday Wednesday Thursday Friday Satday Sunday Monday" Monday" 
 dayname$ = word$(days$,(date$(dt$) mod 7)+1) 
 end function [code]