sum column in datatable vb.net 2010

Question

I am trying to get the sum of the column TotalAmount in my DataTable dt but I always get this error:

Object reference not set to an instance of an object.

I am using VB in Visual Studio 2012.

Here's the code:

Dim table As DataTable = CartDataSet.Tables("dt")
Dim result As Integer
result = table.Compute("SUM(TotalAmount)", "")

Screenshot

http://stackoverflow.com/q/4660142/1402846 – Pang Aug 03 '14 at 05:29 — Pang, Aug 03 '14 at 05:29

score 3 · Answer 1 · answered Jul 27 '17 at 17:24

3

Dim result As Object
result = table.Compute("SUM(TotalAmount)", "")

then do result.ToString() you will get your output

answered Jul 27 '17 at 17:24

Amit Patel

155
1
6

score 1 · Answer 2 · answered Aug 03 '14 at 05:30

1

You are trying to de-reference a NULL object reference, which means table is NULL.

That in turn, means CartDataSet does not contain a table named "dt"

answered Aug 03 '14 at 05:30

Mitch Wheat

295,962
43
465
541

score 1 · Answer 3 · edited Oct 24 '15 at 05:14

1

Dim dt As DataTable = TajDataSet.Tables("MAtab")
Dim sum As Integer = Convert.ToInt32(dt.Compute("SUM(ServiceCharge)", String.Empty))
SCC.Text = sum.ToString

edited Oct 24 '15 at 05:14

Vivek S.

19,945
7
68
85

answered Jul 12 '15 at 05:34

Yocto Karthi

21
4

1

Couly you please destribe your code instead oj just typing some code lines – bish Jul 12 '15 at 05:59

score 1 · Answer 4 · answered Aug 15 '17 at 15:00

1

You can use linq, like this.

Dim result As Decimal = dt.AsEnumerable().Sum(Function(row) row.Field(Of Decimal)("TotalAmount"))

answered Aug 15 '17 at 15:00

Quethzel Diaz

621
1
11
26

score 0 · Answer 5 · answered Nov 14 '14 at 05:43

Possible Issues

Table is null
No records in the table

Solutions:

1- Better to check the datatable status before computation like

If Not table Is Nothing AndAlso table.Rows.Count > 0 Then
...
End If

2- Check for DBNULL while computing in case no records

IIf(IsDBNull(table.Compute("SUM(TotalAmount)", "")), "0", table.Compute("SUM(TotalAmount)", ""))

score 0 · Answer 6 · answered Aug 13 '15 at 20:03

0

For the ".Compute" function to work, you have to declare your variable "result" as "object" instead of "integer". Then later you can convert the value in "result" to an integer using "Convert.ToInt".

Dim result as object

answered Aug 13 '15 at 20:03

DCraft

1

score 0 · Answer 7 · answered Sep 03 '20 at 17:20

0

Dim table As DataTable = CartDataSet.Tables("dt")

Dim result As Integer

result = IIf(IsDBNull(dtable.Compute("SUM(TotalAmount)",""),0,dtable.Compute("SUM(TotalAmount)", ""))

answered Sep 03 '20 at 17:20

Andres Sarria

11

sum column in datatable vb.net 2010

7 Answers7