测试了，效果一样，删除子表行的时候，有触发效果，但是返回值不对，返回的是执行未完结，按理来说是返回未执行。在子表不删除行的情况下，数量直接删除，则能返回正确的结果。Select Case e.DataCol.Name
Case "so_oder_qty", "so_shp_qty"
If e.DataRow.IsNull("so_oder_qty") OrElse e.DataRow.IsNull("so_shp_qty") Then
If e.DataRow.IsNull("so_shp_qty") Then
e.DataRow("so_stutas") = "未执行"
e.DataRow.Locked = False
End If
Else If e.DataRow("so_oder_qty") > e.DataRow("so_shp_qty") and Then
e.DataRow("so_stutas") = "执行未完结"
e.DataRow.Locked = False
Else
e.DataRow("so_stutas") = "执行完毕"
e.DataRow.Locked = True
End If
End Select
感觉是0和空值引起的，修改了代码，效果还是一样。
Select Case e.DataCol.Name
Case "so_oder_qty", "so_shp_qty"
If e.DataRow.IsNull("so_oder_qty") OrElse e.DataRow.IsNull("so_shp_qty") Then
If e.DataRow("so_shp_qty") = 0 Then
e.DataRow("so_stutas") = "未执行"
e.DataRow.Locked = False
End If
Else If e.DataRow("so_oder_qty") > e.DataRow("so_shp_qty") AndAlso e.DataRow("so_shp_qty") <> 0 Then
e.DataRow("so_stutas") = "执行未完结"
e.DataRow.Locked = False
Else If e.DataRow("so_oder_qty") <= e.DataRow("so_shp_qty")
e.DataRow("so_stutas") = "执行完毕"
e.DataRow.Locked = True
End If
End Select
烦请老师再指点一二
此主题相关图片如下：结果.png
加好友 
发短信
Post By：2023/1/5 9:33:00 [只看该作者]
