/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
time udregning
Fra : hom


Dato : 02-02-01 15:09

Hej

er det muligt at regne antal timer ud på en dag - et tidsrum
eks. 08:00 - 15:00 - pause fra 12:00 til 12:30

på forhånd tak
Henrik



 
 
SC (03-02-2001)
Kommentar
Fra : SC


Dato : 03-02-01 15:18

Her er et eks. jeg ved ikke om det er noget der kan bruges?

Public Function Arbejdstid(Starttid As Date, Sluttid As Date, PauseMin
As Date)

'kun på en linie det er Outlook der laver linieskift
Arbejdstid = TimeSerial(Hour(Sluttid) - Hour(Starttid),
Minute(Sluttid) - (Minute(Starttid) , PauseMin), 0)

End Function


Private Sub Form_Load()
Label1.Caption = Arbejdstid("8:00", "15:00", "30")
End Sub

mvh Stig

"hom" <hom@christensen.dk> skrev i en meddelelse
news:Ebze6.23822$l57.1044689@news000.worldonline.dk...
> Hej
>
> er det muligt at regne antal timer ud på en dag - et tidsrum
> eks. 08:00 - 15:00 - pause fra 12:00 til 12:30
>
> på forhånd tak
> Henrik
>
>



Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408901
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste