If e.DataCol.Name = "车辆编号" OrElse e.DataCol.Name = "车牌号" Then Dim dr As DataRow = DataTables("年审信息").AddNew() If e.DataRow.IsNull("车辆编号") = False AndAlso e.DataRow.IsNull("车牌号") = False Then dr("车辆编号") = e.DataRow("车辆编号") dr("车牌号") = e.DataRow("车牌号") Else dr("车辆编号") = Nothing dr("车牌号") = Nothing End If End If