主题：[求助] 统计数据表问题

Dim c_gt12 As Double = DataTables("装机工单清单表").compute("Avg(处理时长)", "区域 = '" & r("区域") & "' and 工作站名称 = '" & r("工作站名称") & "' and 网格名称 = '" & r("网格名称") & "' and 装维人员姓名 = '" & r("装维人员姓名") & "' and  (归档时间 is not null )  ")

r("开通平均时长") = format(c_gt12, "0.00")

贴出代码

上传例子测试

DataTables("装机工单清单表").LoadFIlter =  "派单日期 >= '"& dt1.AddDays(-1) & "' "
DataTables("装机工单清单表").Load

For Each r As Row In Tables("匹配服开新工单数据表").Rows
    Dim dr As DataRow = DataTables("装机工单清单表").Find("工单号 = '" & r("工单号") & "' ")
    If dr Is Nothing Then
        dr = DataTables("装机工单清单表").AddNew
    End If
    dr("装维人员姓名") = r("装维人员姓名")
    dr("服务厅") = r("服务厅")
    dr("客户姓名") = r("客户姓名")
    dr("客户联系方式") = r("客户联系方式")
    dr("宽带帐号") = r("宽带帐号")
    dr("客户地址") = r("客户地址")
    dr("工单号") = r("工单号")
    dr("派单日期") = r("派单日期")
    dr("归档时间") = r("归档时间")
Next