显示两个日期之间星期 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 显示两个日期之间星期

共有5846人关注过本帖树形打印复制链接主题：显示两个日期之间星期

Bin

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：35433 积分：178530 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/6/22 11:58:00 [显示全部帖子]

Dim d1 As Date = Date.Today

Dim d2 As Date = d1.AddDays(5)

Dim ds As Integer = (d2-d1).TotalDays

For i As Integer=0 To ds -1

MessageBox.show("星期" & IIF(d1.AddDays(i).DayOfWeek=0,"日",CLNum(d1.AddDays(i).DayOfWeek)))

Bin

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：35433 积分：178530 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/6/22 13:59:00 [显示全部帖子]

以下是引用wenjingyuan88在2013-6-22 13:42:00的发言：

如果是开发得好的软件，是大众化的，你们的软件我刚用都无从下手，包括现在还是这样我跟本看不懂，应该怎么用

你好,狐表并不是应用软件,而是开发工具.不看静下心来认真看帮助是无法掌握理解的. 要知道别人是需要经过多年的学习以及实践才能做出一款软件来. 而狐表只需要十几天就能掌握开发出软件来.

主题：显示两个日期之间星期