Umrechnen von Minuten

  • Hallo,
    ich müsste wissen wie ich mit dem Datumsformat umgehen muss.

    Bsp: Eingabe 1550 Minuten Ausgabe 01:01:50 Also Tag:Stunde:Minute

    Wie rechne ich das am geschicktesten um ?

    Vielen Dank im voraus

    mfg

    • Offizieller Beitrag

    Da ich krank bin und mir langweilig war hab ich dir mal was geschrieben .

    [autoit]

    Global $Zeit[3]
    Global $Minuten
    $Minuten =InputBox("Minuten unrechnen","Minuten eingeben")
    $Zeit = Zeitinfo($Minuten)
    msgbox(0,"Zeitinfo",$Minuten&" Minuten sind : "&$Zeit[0]&" Tage "&$Zeit[1]&" Stunden "&$Zeit[2]&" Minuten",5)

    [/autoit][autoit][/autoit][autoit]

    Func ZeitInfo($Anzahl)
    Dim $TempZeit[3]
    $TempZeit[2] = $Anzahl - Int($Anzahl / 60) * 60
    $TempZeit[0] = Int(Int($Anzahl / 60) / 24)
    $TempZeit[1] = Int($Anzahl / 60) - $TempZeit[0] * 24
    Return $TempZeit
    EndFunc

    [/autoit]