Question

Data :

Empcode    Amount 30034      27.25 30034      124 

linq code

    Dim ComputedData = From p In AllOrders _                        Order By p.Field(Of String)('EmpCode') _                      Group By Key = p.Field(Of String)('EmpCode') Into Group _                      Select EmpCode = Key, _                             Consumption = Group.Sum(Function(p) p('Amount')) 

Output

Empcode    Amount 30034       151 

The issue is that I must receive 151**.25** but the output is just 151.

How to avoid this rounding of?

Answer 1

Used Cdbl and the issues is solved

Dim ComputedData = From p In AllOrders _                    Order By p.Field(Of String)('EmpCode') _                  Group By Key = p.Field(Of String)('EmpCode') Into Group _                  Select EmpCode = Key, _                         Consumption = Group.Sum(Function(p) CDec(p('Amount'))) 

EDIT: Cdbl was giving output for some 1.05 as 1.1 as 1.150000000006 so used CDec instead