- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 怎样计算第几周 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=18203)
-- 发布时间：2012/4/6 7:31:00
-- 怎样计算第几周
从星期一 到 星期日 为一个星期，按照法定的星期，计算日期列中的日期是第几周，即订单表中“第几周”列的刷新代码如何写，谢谢！！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目22.table |
-- 发布时间：2012/4/6 8:57:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.rar |
-- 发布时间：2012/4/6 9:12:00
--
If e.DataCol.Name = "日期" Then
If e.DataRow.IsNull("日期") Then
e.DataRow("第几周") = Nothing
Else
Dim calCommon As New System.Globalization.GregorianCalendar()
Dim dt As Date = e.DataRow("日期")
e.DataRow("第几周") = calCommon.GetWeekOfYear(dt, System.Globalization.CalendarWeekRule.FirstDay, 0)
End If
End If
-- 发布时间：2012/4/6 9:27:00
--
谢谢两位！
代码不理解