我设置了判断“引体向上插值”大于等于下限,和小于上限,“引体向上附加分”为何结果除了1分以外的都显示10分呢?表结构如下

此主题相关图片如下:qq截图20170610122119.jpg

代码如下
If e.DataCol.name = "年级" OrElse e.DataCol.name = "性别" OrElse e.DataCol.name = "引体向上差值" Then
If e.DataRow.isnull("年级") = False And e.DataRow.isnull("性别") = False And e.DataRow.isnull("引体向上差值") = False Then
Dim dr As DataRow = DataTables("引体向上加分").find("年级 ='" & e.DataRow("年级") & "' and 性别 ='" & e.DataRow("性别") & "' and 下限 <= " & e.DataRow("引体向上差值") & " and 上限 > " & e.DataRow("引体向上差值"))
If dr IsNot Nothing
e.DataRow("引体向上附加分") = dr("分数")
End If
End If
End If