- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]关于日期分解显示需求 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=123805)
-- 发布时间：2018/8/23 13:24:00
-- [求助]关于日期分解显示需求
老师好！
现在有个需求：1.表增加行时，自动录入需求相应的日期分解格式内容。2.根据表列（年月日小时分秒），进行分解显示需求列格式内容。万分感谢！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:日期格式分开显示.foxdb |
谢谢！
-- 发布时间：2018/8/23 14:17:00
--
datacolchanged事件
If e.DataCol.Name = "年月日小时分秒"
If e.DataRow.IsNull("年月日小时分秒") Then
e.DataRow("年") = Nothing
e.DataRow("小时分秒") = Nothing
Else
Dim d As Date = e.NewValue
e.DataRow("年") = d.Year
e.DataRow("小时分秒") = Format(d,"HH:mm:ss")
End If
End If
剩下的参考帮助自己做：