主题：合计数

Tables("全表_table1").GrandTotal = True
For Each c As DataCol In Tables("全表_table1").DataTable.dataCols
    If c.IsNumeric  Then
        Tables("全表_table1").Cols(c.name).GrandTotal = True
    End If
Next

以上代码可以在表最后一行显示合计数，但是我怎么通过代码得到此数，并显示在控件text中