当“表C”数据变化后到“BMI标准”的表内查找符合要求的“评分”“等级”数据写回到“表C”的列明“BMI等级”“BMI分值”里面去。
弄好了好久无解,谢谢大家
代码在
此主题相关图片如下:qq截图20170222165257.png
执行
代码内容
If e.DataCol.name = "年级" OrElse e.DataCol.name = "性别" OrElse e.DataCol.name = "BMI值" Then
If e.DataRow.isnull("年级") = False And e.DataRow.isnull("性别") = False And e.DataRow.isnull("BMI值") = False Then
Dim dr As DataRow = DataTables("BMI标准").find("年级 ='" & e.DataRow("年级") & "' and 性别 ='" & e.DataRow("性别") & "' and 下限 >= " & e.DataRow("BMI值") & " and 上限 <= " & e.DataRow("BMI值"))
If dr IsNot Nothing
e.DataRow("BMI等级") = dr("等级")
e.DataRow("BMI分数") = dr("分数")
End If
End If
End If
表结构:
此主题相关图片如下:qq截图20170222165415.png
此主题相关图片如下:qq截图20170222165441.png
[此贴子已经被作者于2017/2/22 16:57:10编辑过]