Dim pr As DataRow = e.DataRow.GetParentRow("出库")If pr.Locked = True MessageBox.Show("已审核的单据不能再修改!") e.DataRow.Delete ' End If
我再执行以上代码时出现了错误提示,请问怎样解决?