我想比较同一行中的几个列的值，取他们的最大值，最小值，总和。有下面的代码：
Dim dr As DataRow = e.DataRow
Dim Values(4) As Double
Values (0) = dr("分数1")
Values (1) = dr("分数2")
Values (2) = dr("分数3")
Values (3) = dr("分数4")
Values (4) = dr("分数5")
Dim MaxVal As Double
Dim MinVal As Double
Dim SumVal As Double
For i As Integer = 0 To Values.Length - 1
MaxVal = Math.Max(MaxVal, Values(i))
MinVal = Math.Min(MinVal, Values(i))
SumVal = SumVal + Values(i)
Next
dr("最高分") = MaxVal
dr("最低分") = MinVal
dr("总分") = SumVal
为什么使用以上代码，最高分和总分都能出来，最低分总是为0，请教！
加好友 
发短信
Post By：2023/6/4 1:35:00 [显示全部帖子]
