Do Until rec1.EOF = True
'More code here
If rec1.EOF = True Then
HoursServed(i) = HoursServed(i) & " Total = " & LoopTotal
End If
Loop
Do Until rec1.EOF = True
'More code here
If rec1.EOF = True Then
HoursServed(i) = HoursServed(i) & " Total = " & LoopTotal
End If
rec1.MoveNext
Loop
such as rec1.MoveNext(). I'm presuming that you do that AFTER the rec1.eof check. you should do that right before.