Dim dr As DataRow = e.DataRow
Dim dt As DataTable =DataTables("鉴定统计表")
If e.DataCol.Name = "工作单位" And dr.IsNull("工作单位") = False Then
dr("中级工") = dt.Compute("Count(工作单位)", dr("中级工") & " 中级工")
dr("高级工") = dt.Compute("Count(工作单位)", dr("高级工") & " 高级工" )
dr("技师") = dt.Compute("Count(工作单位)", dr("技师") & " 技师" )
dr("高级技师") = dt.Compute("Count(工作单位)", dr("高级技师") & " 高级技师" )
End If
甜版,这段代码写入后,下面表没反应,总感觉哪不对,但不知错在哪里?请指教!