主题：新手求助，列不固定，如何求各列合计？

DataColChanged事件：

if e.DataCol.IsNumeric then

    Dim sum AS double

    For Each dc As DataCol  in e.DataTable.DataCols

           sum = sum + e.datarow(dc.name)

    Next

    e.datarow("合计列") = sum

end if