1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15:
Public () как двойник Тусклое понедельник как дата = GetThisMondayDate () Тусклое totalTime = от t в Me.ObjectContext.TIMESHEETs Где t.TaskDate = понедельник Выберите t Если <> 0 totalTime.Count после этого Возвращенный компосит t в totalTime в сумму (T.TaskTime) Еще Возвращение 0 Закончитесь если Закончите функцию
1: 2: 3: 4: 5:
Затемните вопрос = от t в _ ObjectContext.TIMESHEETs Где t.TaskDate = _ понедельник Выберите t.TaskTime Тусклая сумма как интежер = IIf (вопрос IsNot ничего, вопрос. Сумма (), 0)