加上条件不就行啦:
e.DataRow("最低分") = Math.Round(dt.Compute("min(" & dr("科目") & ")","[期数] = '" & e.DataRow("期数") & "'And [班级] = '" & e.DataRow("班级") & "' And “ & dr("科目") & ”> 0" ),1)
e.DataRow("最低分") = Math.Round(dt.Compute("min(" & dr("科目") & ")","[期数] = '" & e.DataRow("期数") & "'And [班级] = '" & e.DataRow("班级") & "' And 总分 > 0" ),1)