看看是否等于的问题,比如 40岁、45岁的时候,会有问题。
Dim dr As DataRow = DataTables("肺活量标准").find("性别 ='" & r("性别") & "' and 年龄下限 <= " & r("年龄") & " and 年龄上限 >= " & r("年龄") & " and 数值下限 <= " & r("肺活量") & " and 数值上限 > " & r("肺活量") )