修改公式,如
DataTables("统计表1").DataCols.Add(nm & "_及格率",Gettype(Double), "iif(" & nm & "_及格 is null, null, " & nm & "_及格/人数)" )