老师,这个判断末级的好像有点问题。没有实现真正的末级判断。
If e.DataCol.Name = "科目代码" Then
If e.DataRow.IsNull("科目代码") Then
e.DataRow("是否末级科目") = Nothing
Else
If e.DataTable.Find("科目代码 like '" & e.DataRow("科目代码") & "%' and 科目代码 <> '" & e.DataRow("科目代码") & "'") Is Nothing Then
e.DataRow("是否末级科目") = "末级"
Else
e.DataRow("是否末级科目") = "非末级"
End If
End If
End If
还有一种情况就是,现在的科目是“末级”属性,当我新增一条下级科目的时候,那么原先的“末级”科目应该变化为“非末级”,这个用“重置”按钮就可以了吗?