下列代码统计的结果怎么与我实际的要求有出入 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

if e.DataCol.Name = "单位" then
    dim dr as datarow = DataTables("学籍注册").Find("[单位] = '" & e.datarow("单位") & "'")
    if dr isnot nothing then
        e.datarow("毕业人数") = dr("毕业人数")
    else
        e.datarow("毕业人数") = nothing
    end if
    dim bys as Integer = DataTables("tja").Compute("Sum(毕业人数)")
    dim syzx as Integer = DataTables("tja").Compute("Sum(毕业人数)", "[高中招生学校] = '实验中学'")
    dim pjzx as Integer = DataTables("tja").Compute("Sum(毕业人数)", "[高中招生学校] = '屏锦中学'")
    dim yyzx as Integer = DataTables("tja").Compute("Sum(毕业人数)", "[高中招生学校] = '袁驿中学'")
    dim flzx as Integer = DataTables("tja").Compute("Sum(毕业人数)", "[高中招生学校] = '福禄中学'")
    if e.datarow("高中招生学校") = "实验中学" then
        e.datarow("实验中学") = 170 / syzx * e.datarow("毕业人数")
    elseif e.datarow("高中招生学校") = "屏锦中学" then
        e.datarow("屏锦中学") = 270 / pjzx * e.datarow("毕业人数")
    elseif e.datarow("高中招生学校") = "袁驿中学" then
        e.datarow("袁驿中学") = 120 / yyzx * e.datarow("毕业人数")
    elseif e.datarow("高中招生学校") = "福禄中学" then
        e.datarow("福禄中学") = 120 / flzx * e.datarow("毕业人数")
      end if
end if

主题：下列代码统计的结果怎么与我实际的要求有出入