Call SUB rutine - giver ikke svar i første gennemløb

Jeg har en løkke som kalder en subrutine MEN den giver ikke
svar i det første gennemløb, derimod er alle de andre OK. Kan nogen gennmskue hvad problemet er.

<%'-----------------------------------------------------------------------------------------------------------
For i=0 to 3
    dagGaa="16:30"
    dagKom="08:00"
    Call udregn(Difftid)
    response.write"differencen i minutter er: " &Brutmin
Next


SUB udregn(Difftid)
    if IsDate(dagKom) and Isdate(dagGaa) then
        Khour=hour(dagKom)
        Kmin=minute(dagKom)
        KBrutmin=(Khour*60)+Kmin
       
        Ghour=hour(daggaa)
        If daggaa<"08:00" Then Ghour=Ghour+24
        Gmin=minute(daggaa)
        GBrutmin=(Ghour*60)+Gmin

        Diffminut=GBrutmin-KBrutmin
    Else
        Response.write"dagKom-dagGaa er ikke et datoformat"
    End if
End SUB
%>   
---------------------------------------------------------------------------------------------------
Resultatet er:
differencen i minutter er:
differencen i minutter er: 510
differencen i minutter er: 510
differencen i minutter er: 510