这个是什么意思???
Select Case e.DataCol.name
Case "最新状态","状态变更日期"
Dim dr As DataRow = e.DataTable.Find("管理编号 = '" & e.DataRow("管理编号") & "' And 设备名称 = '" & e.DataRow("设备名称") & "'","状态变更日期 Desc")
Dim pr As DataRow = e.DataRow.GetParentRow("父表")
If pr IsNot Nothing AndAlso dr IsNot Nothing Then
pr("管理状态") = dr("最新状态")
End If
End Select