| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]多层表头问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=47719) |
| -- 作者：pinnacle -- 发布时间：2014/3/15 21:31:00 -- [求助]多层表头问题 这个表的的表头写的对吗？上午下面有上班和下班 还是上午不用写 Select Case e.DataCol.name Case "上午上班","上午下班" Dim dr As DataRow = e.DataRow If dr.IsNull("上午上班") Or dr.IsNull("上午下班") Then dr("总时间") = Nothing Else Dim tp As TimeSpan tp = dr("上午下班") - dr("上午上班") dr("总时间") = tp.TotalSeconds() End If End Select 麻烦帮忙！！
[此贴子已经被作者于2014-3-15 21:39:07编辑过]
|
| -- 作者：lsy -- 发布时间：2014/3/15 21:58:00 -- Select Case e.DataCol.name Case "上午_上班","上午_下班"
Dim dr As DataRow = e.DataRow
If dr.IsNull("上午_上班") Or dr.IsNull("上午_下班") Then
dr("总时间") = Nothing
Else
Dim tp As TimeSpan
tp = dr("上午_下班") - dr("上午_上班")
dr("总时间") = tp.TotalSeconds()
End If
End Select
[此贴子已经被作者于2014-3-15 21:57:50编辑过]
|
| -- 作者：pinnacle -- 发布时间：2014/3/15 22:23:00 -- 谢了，搞好了 |
| -- 作者：pinnacle -- 发布时间：2014/3/15 22:24:00 -- 请问如果加个下午的时间呢？要怎样做？ |
| -- 作者：pinnacle -- 发布时间：2014/3/15 22:26:00 -- 请问如果加个下午的时间呢？要怎样做？ 也是一样的 加 下午下班减下午上班 |
| -- 作者：狐狸爸爸 -- 发布时间：2014/3/16 11:37:00 -- Select Case e.DataCol.name Case "上午_上班","上午_下班"
Dim dr As DataRow = e.DataRow
If dr.IsNull("上午_上班") Or dr.IsNull("上午_下班") Then
dr("总时间") = Nothing
Else
Dim tp As TimeSpan
tp = dr("上午_下班") - dr("上午_上班")
dr("上午上班时间") = tp.TotalSeconds()
End If
Case "下午_上班","下午_下班"
Dim dr As DataRow = e.DataRow
If dr.IsNull("下午_上班") Or dr.IsNull("下午_下班") Then
dr("下午上班时间") = Nothing
Else
Dim tp As TimeSpan
tp = dr("下午_下班") - dr("下午_上班")
dr("下午上班时间") = tp.TotalSeconds()
End If End Select
另外总时间改为表达式列： [上午上班时间] + [下午上班时间]
如果的上班时间不存在跨越午夜12点的情况，可能用表达式计算会方便很多：
建议你先按顺序看帮助两遍。
|
| -- 作者：surgeme -- 发布时间：2016/7/5 16:50:00 -- 都有见有什么回答的呢？论坛管理不到位啊 |