老师，您好。1.获得的<打卡时间>，只显示了日期，如何全部显示(时间+日期)。
2.如果还有别的列要加载，需要如何处理？
我是想这样搞，也不知道是否能运行，而且效率一定很差，并且要把(打卡数据表)全部加载进来，想想也不是好办法。请老师帮忙。
Dim dtb As New DataTableBuilder("临时表1") '生成临时表
dtb.AddDef("姓名", Gettype(String), 16)
dtb.AddDef("类型", Gettype(String), 16)
dtb.AddDef("打卡时间", Gettype(String), 32)
Dim dt As DataTable = dtb.Build(True)
For Each dr1 As DataRow In DataTables("统计").DataRows
For Each dr2 As DataRow In DataTables("打卡").DataRows
If dr1("姓名") = dr2("姓名") And dr1("打卡时间") = dr2("打卡时间") Then
Dim ndr As DataRow = dt.AddNew()
ndr("姓名") = dr2("姓名")
ndr("类型") = dr2("类型")
ndr("打卡时间") = dr2("打卡时间")
ndr("地点") = dr2("地点")
End If
Next
Next
With wb.AddTable("","Table1")
.CreateFromDataTable(dt) '用于根据Foxtable的DataTable自动生成网页
End With
此主题相关图片如下：123.jpg
此主题相关图片如下：12311.jpg
[此贴子已经被作者于2017/6/10 15:57:36编辑过]
加好友 
发短信
Post By：2017/6/10 13:32:00 [显示全部帖子]
