主题：最大值，最小值

谢谢！我已经找到好一点的方法了

Dim n1 As Integer = e.DataRow("接收数量_木工组")
Dim n2 As Integer = e.DataRow("接收数量_打磨组")
Dim n3 As Integer = e.DataRow("接收数量_油漆组")
Dim n4 As Integer = e.DataRow("接收数量_装配组")
Dim n5 As Integer = e.DataRow("接收数量_入库量")
Dim n6 As Integer = e.DataRow("接收数量_发货量")
Dim n7 As Integer = e.DataRow("接收数量_台盆计划")
Dim n8 As Integer = e.DataRow("接收数量_关闭量")
e.DataRow("max")=Math.Max(Math.Max(Math.Max(Math.Max(Math.Max(Math.Max(Math.Max(n1,n2),n3),n4),n5),n6),n7),n8)