VB.net 中使用 返回

C#论坛 老数据
1 1745
该叫什么 xy.z 发布于2021/2/4
悬赏:0 飞吻

'运行报错

'SqlSugar.SqlSugarException:“SqlSugarException.NotSupportedException:new VB$AnonymousType_0`1(UserName = m.UserName)”


        Dim text = db.Queryable(Of MainTableViewAll)(
            ).GroupBy(Function(m) New With {m.UserName}    '当需要多个group时, 需要这么写多个字段, C#的例子也是这样写的.
             ).Select(Function(m) New NewTable With {.S1 = m.UserName, .Val = SqlFunc.AggregateSum(m.Price_Order)}
             ).ToJson



'运行正常

        Dim text = db.Queryable(Of MainTableViewAll)(
            ).GroupBy(Function(m) m.UserName        '单独写一个字段, 运行正常.
             ).Select(Function(m) New NewTable With {.S1 = m.UserName, .Val = SqlFunc.AggregateSum(m.Price_Order)}
             ).ToJson

'另外 


'多行拉姆达

'不支持.

        Dim text = db.Queryable(Of MainTableViewAll)(
             ).GroupBy(Function(m)
                           Return m.UserName
                       End Function
             ).Select(Function(m) New NewTable With {.S1 = m.UserName, .Val = SqlFunc.AggregateSum(m.Price_Order)}
             ).ToJson


热忱回答1

  • xy.z xy.z VIP0
    2021/2/4
            Dim text = db.Queryable(Of MainTableViewAll)(
                 ).GroupBy(Function(m) m.UserName
                 ).GroupBy(Function(m) m.StoreCode
                 ).GroupBy(Function(m) m.Province
                 ).Select(Function(m) New NewTable With {.S1 = m.UserName, .S2 = m.Province, .S3 = m.StoreCode, .Val = SqlFunc.AggregateSum(m.Price_Order)}
                 ).ToJson

    多个字段 group 可以这样写...

    但是, 无法像c#那样操作. 

    0 回复