各位大霞，请帮帮我！！！！！

您所在位置：社区首页 — Visual Foxpro讨论区 — 各位大霞，请帮帮我！！！！！

回帖发新帖刷新版面

主题：各位大霞，请帮帮我！！！！！

aastzy [专家分：0] 发布于 2009-09-02 10:26:00

我用VF9在编一个小程序，里面设计到了一个月的天数，每个月的天数有大有小，一个月的星期日的数量也有时不太一样，不知道有没有什么函数可以一下子统计出这个月的天数，并且可以计算出这个月有几个星期天？请各位高手多多指教！！！！

本帖地址： http://bbs.pfan.cn/post/308019.html

回复列表（共1个回复）

沙发

sywzs [专家分：5650] 发布于 2009-09-02 12:45:00

SET CENTURY ON
SET DATE ANSI
YM="2009.9"  &&年和月
TS=GOMONTH(CTOD(YM+".1"),1)-CTOD(YM+".1")  &&天数
?"共 "+ALLTRIM(STR(TS))+" 天"
XQ=DOW(CTOD(YM+".1"))                      &&月初是一周的第几天
?IIF(XQ=1 AND mod(TS,7)>0 OR XQ=7 AND mod(TS,7)>1 OR XQ=6 AND mod(TS,7)>2,"5个星期日","4个星期日")

我来回复

您尚未登录，请登录后再回复。点此登录或注册

主题：各位大霞，请帮帮我！！！！！

回复列表（共1个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：各位大霞，请帮帮我！！！！！

回复列表 （共1个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共1个回复）