Visual Basic

Manufacture                 Model No                Length         Width      height 

Manufacture 1              MD-01                    200               300        100

Manufacture 1              MD-02                    300               400        100

Manufacture 1              MD-03                    400              300         150

Manufacture 2              MAD-01                  200              450        100

Manufacture 2              MAD-02                  250               400        100

Manufacture 3              MDI-01                   300             300         100

Manufacture 4              MOv-01                   350            300         100

Dim m_startDate As DateTime = New DateTime(2015, 9, 1, 0, 0, 0)
Dim m_stopDate As DateTime = New DateTime(2015, 9, 1, 23, 59, 59, 999)

Dim context As New hx5Context()
Dim pResult = _
(
    From oh In context.Order_History
    Where oh.OrderDate >= m_startDate _
    And oh.OrderDate <= m_stopDate _
    And oh.OrderStatus = "COMPLETED"
    Group By oh = New With
    {
        oh.SubTotal,
        oh.Shipping,
        oh.SalesTax,
        oh.GrandTotal
    } Into Group
    Select 
    {
        Group.Count(),
        Group.Sum(Function(m) m.SubTotal),
        Group.Sum(Function(m) m.Shipping),
        Group.Sum(Function(m) m.SalesTax),
        Group.Sum(Function(m) m.GrandTotal)
    }.FirstOrDefault()
)

pResult.Dump()