| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 显示两个日期之间星期 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=35036) |
| -- 作者：联友 -- 发布时间：2013/6/22 11:43:00 -- 显示两个日期之间星期 显示两个日期之间星期，比如：2013-06-17至2013-06-20 怎样才能显示 星期一、星期二、星期三、星期四。请指点谢谢！ |
| -- 作者：Bin -- 发布时间：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))) Next
|
| -- 作者：联友 -- 发布时间：2013/6/22 12:02:00 -- 谢谢！ |
| -- 作者：程兴刚 -- 发布时间：2013/6/22 12:18: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(format(d1.AddDays(i),"dddd"))
Next
|
| -- 作者：ifastudy -- 发布时间：2013/6/22 13:35:00 -- 怎么让表中的数据显示成format指定的格式呢？比如日期2013-06-20显示成：06/20。 |
| -- 作者：wenjingyuan88 -- 发布时间：2013/6/22 13:42:00 -- 如果是开发得好的软件，是大众化的，你们的软件我刚用都无从下手，包括现在还是这样我跟本看不懂，应该怎么用
|
| -- 作者：Bin -- 发布时间：2013/6/22 13:59:00 -- 以下是引用wenjingyuan88在2013-6-22 13:42:00的发言： 如果是开发得好的软件，是大众化的，你们的软件我刚用都无从下手，包括现在还是这样我跟本看不懂，应该怎么用
|