データテーブルには、文字列、DateTime、decimalの3つの列があります。文字列と10進数の列でグループ化し、グループ化された行については10進数の値を合計したいと思います。合計部分の実行方法は知っていますが、データテーブル内の2つの異なる列をどのようにグループ化しますか?
これはこれまでのところ正しく機能しない私のコードです:
var newSort = from row in objectTable.AsEnumerable()
group row by new {ID = row.Field<string>("resource_name"), time1 = row.Field<DateTime>("day_date")} into grp
orderby grp.Key
select new
{
resource_name1 = grp.Key.ID,
day_date1 = grp.Key.time1,
Sum = grp.Sum(r => r.Field<Decimal>("actual_hrs"))
};
あなたが私たちに完全な話をしているとは思わない。 orderby
が匿名型で機能しない(指定したコードはコンパイルされない)ことを除いて、クエリは希望どおりに機能するはずです。私はこれをLINQPadに入れました:
var objectTable = new DataTable();
objectTable.Columns.Add("resource_name",typeof(string));
objectTable.Columns.Add("day_date",typeof(DateTime));
objectTable.Columns.Add("actual_hrs",typeof(decimal));
objectTable.Rows.Add(1, DateTime.Today, 1);
objectTable.Rows.Add(2, DateTime.Today, 2);
var newSort = from row in objectTable.AsEnumerable()
group row by new {ID = row.Field<string>("resource_name"), time1 = row.Field<DateTime>("day_date")} into grp
select new
{
resource_name1 = grp.Key.ID,
day_date1 = grp.Key.time1,
Sum = grp.Sum(r => r.Field<Decimal>("actual_hrs"))
};
newSort.Dump();
...そして私はこれらの結果を得ました:
resource_name1 | day_date1 | Sum
1 | 7/1/2011 12:00:00 AM | 1
2 | 7/1/2011 12:00:00 AM | 2
このコードを使用する
var newSort = from row in objectTable.AsEnumerable()
group row by new {ID = row.Field<string>("resource_name"), time1 = row.Field<DateTime>("day_date")} into grp
orderby grp.Key
select new
{
resource_name1 = grp.Key.ID,
day_date1 = grp.Key.time1,
Sum = grp.Sum(r => Convert.ToDecimal(r.ItemArray[2]))
};
Vb.netでソリューションが必要な場合は、次の例を参照してください。
Dim workTable As DataTable = New DataTable("Customers")
Dim workCol As DataColumn = workTable.Columns.Add("ID", Type.GetType("System.Int32"))
workTable.Columns.Add("Total", Type.GetType("System.Decimal"))
workTable.Columns.Add("Compra", Type.GetType("System.Decimal"))
Dim row As DataRow = workTable.NewRow()
row("id") = 2
row("total") = 1.5
row("compra") = 3
workTable.Rows.Add(row)
row = workTable.NewRow()
row("id") = 1
row("total") = 1.5
row("compra") = 3.3999999999999999
workTable.Rows.Add(row)
row = workTable.NewRow()
row("id") = 1
row("total") = 1.5
row("compra") = 5
workTable.Rows.Add(row)
Dim detalles As IEnumerable(Of DataRow) = workTable.AsEnumerable()
Dim query = From detalle In detalles.AsEnumerable() _
Group detalle By grupoClave = New With _
{ _
Key .C2 = detalle("id"), _
Key .C4 = detalle("total")} Into g = Group _
Select New With _
{ _
.Col2 = g(0).Field(Of Integer)("id"), _
.Col3 = g(0).Field(Of Decimal)("total"), _
.Col4 = g.Sum(Function(fact) fact.Field(Of Decimal)("compra")) _
}
For Each p In query
Console.WriteLine((p.Col2 & p.Col3 & p.Col4))
Next