主题：怎样改代码

Dim nms As String() = {"项目","客户","司机","车牌"}
Tables("数据_Table1").DataSource = dt1
With DataTables("数据汇总_Table1").DataCols  
    .Add("车辆_配载率",Gettype(Integer), "IsNull([Sum(装载量)],0) / ISNULL([Sum(体积)],0)" )
  
End With

这样写不行 计算不出 我想要结果是百分比显示的