VB.NET Linq로 평균 구하기 getAverage
2020. 3. 20. 10:56ㆍC#
728x90
반응형
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
728x90
반응형
'C#' 카테고리의 다른 글
(해결법) 이 Ubiety.Dns.Core.dll 어셈블리의 강력한 이름 서명이 잘못되었습니다. (0) | 2020.03.25 |
---|---|
C# 방향키 입력하여 컨트롤움직이기 (0) | 2020.03.23 |
VB.NET Linq 특정 컬럼 하나만 중복제거 후 Array로 저장하기, vb.net remove duplicate to array for one column (0) | 2020.03.20 |
C#, VB.NET <DataGridView> 마우스 우클릭으로 Multi Row 선택하기, DataGirdVIew다중 선택하기 (0) | 2020.03.16 |
해결법 'Project1'에서 'Sub Main' 을 찾을 수 없습니다. (0) | 2020.03.13 |