用visual foxpro
的有关信息介绍如下:我也很关注这个题如何编写,我觉得是不是还应该给一个已知条件,应该给出某一天是星期几,比如已知2010年6月21日是星期一。
下面程序我在机器上验证过了,正确。
clear
a={^2010/06/21}
b={^2010/01/01}
m=b-a &&得到两个日期相关的天数
do case
case mod(m,7)=0 &&以7天为一个周期循环
?"星期一"
case mod(m,7)=1
?"星期二"
case mod(m,7)=2
?"星期三"
case mod(m,7)=3
?"星期四"
case mod(m,7)=4
?"星期五"
case mod(m,7)=5
?"星期六"
case mod(m,7)=6
?"星期日"
endcase
return