Dim Abfrage = _
           From row In Me.AblageDB.Arbeitszeiten.AsEnumerable _
           Let Jahr = CInt(row.Field(Of Date)("Tag").ToString("yyyy")) _
           Order By row.Tag _
           Group row By Jahr Into Group _
           Select Jahr, Group, _
           Gleitzeitminuten = Group.Sum(Function(row) row.Gleitzeit), _
           Arbeitszeitminuten = Group.Sum(Function(row) row.IstAZ)