VB.NET Linq로 평균 구하기 getAverage

 

Dim avg = dt.AsEnumerable().[Select](Function(x) New With {

       Key .Carrier = x.Field(Of String)("Carrier"),

       Key .Name = x.Field(Of String)("Name"),

       Key .Avg = x.Field(Of Int32)("Level")

   }).Where(Function(s) s.Carrier = "X" AndAlso s.Name = "X")

                                            .[Select](Function(h) h.Avg).FirstOrDefault()

 

If row.Count > 0 Then

    avgValueTC = row.AsEnumerable().Average(Function(x) x.Field(Of String)("컬럼1"))

    avgValueRD = row.AsEnumerable().Average(Function(x) x.Field(Of String)("컬럼2"))

Else

    avgValueTC = CDbl(0.0)

    avgValueRD = CDbl(0.0)

End If