Totaal van row in tijd

[Doofenshmirt]

Hoi,

Kwam het volgende tegen , in een datagridview laat ik het totaal van een kolom uit rekenen en de uitkomst komt in een textbox.
Dit gaat over het aantal van KG van een lading van een vrachtwagen of container.

 Private Function TotaalKg() As Double
        Dim kg As Double = 0
        For Each R As DataGridViewRow In DataGridView1.Rows
            If Not IsDBNull(R.Cells("KG").Value) Then
                kg = kg + Convert.ToDouble(R.Cells("KG").Value)
            End If
        Next
        Return kg
    End Function

En zo wordt het opgeslagen bv 1256,125

Dit gaat goed geen probleem

Maar nu wil ik een kolom uit rekenen met tijd , dus het aantal uren.

Het word opgeslagen als 0 Dagen, 8 uren, 45 minuten

Dan werkt het niet , krijg deze foutmelding

De indeling van de invoertekenreeks is onjuist.

Iemand een andere code ? het gaat dan over het totaal aantal in uren en minuten.

Misschien dat ik de uren enz moet omzetten naar minuten opslaan en dan terug ?????

 

[Doofenshmirt]

Kan niets vinden , maar misschien kan het ook anders.

Misschiend dit

0 Dagen, 8 uren, 45 minuten

omzetten naar minuten , dan opslaan in database.
Dan de hele kolom uit rekenenen kan wel in aantal minuten , dan de uitkomst in een textbox .

Dan het getal in minuten weer omzetten naar Dagen , uren , minuten.

Het gaat met Timespan denk ik ? , maar kan eigenlijk niet iets vinden wat er op lijkt.
Iemand een code hiervoor?


Dus Dagen , uren , minuten omzetten naar minuten , en dan totaal later weer terug

 

[Doofenshmirt]

Hoi,

Ik heb de uitkomst anders gemaakt , inplaats van dagen uren min naar min.

 Dim Tijd1, Tijd2
        Tijd1 = TextBox1.Text
        Tijd2 = TextBox2.Text

         Dim Minuten As Integer = DateDiff(DateInterval.Minute, Tijd1, Tijd2)
        TextBox3.Text = Minuten.ToString

Dit geeft de uitkomst in Minuten.

Maar nu wil ik alleen nog terug.

Van minuten naar uren en minuten , dus bv

textbox.text =  525    uitkomst is     8 uren en 45 minuten

 

[JoZ1]

Kan je het niet in deze notatie bij elkaar optellen:

uur:min:sec

 

[Doofenshmirt]

Hoi JoZ1,

Het moet in uren en minuten , tenminste de uitkomst.
Als bijlage een plaatje hoe het nu is met KG , en een textbox met het totaal KG geladen.

Die kolom worden dan minuten en de textbox met het totaal zou dan omgerekend moeten worden naar Uren en Minuten.

Hoop dat het zo een beetje duidelijk is.

http://imageshack.us/photo/my-images/24/dataminuten.jpg/

 

[Doofenshmirt]

Wat gevonden en aangepast.

In textbox2 het totaal aantal minuten van de kolom uit de datagridview bv 1455

01:Dagen 00:Uren 15:Minuten      Dit is de uitkomst in textbox1

Dit heb ik gebruikt

  Dim totalMinutes As Integer = TextBox2.Text 
        Dim ts As TimeSpan = TimeSpan.FromMinutes(totalMinutes)
        Console.WriteLine("Hours:{0}, Minutes:{1}", ts.Days, ts.Hours, ts.Minutes)
        Console.ReadLine()
        TextBox1.Text = String.Format("{0:00}:Dagen {1:00}:Uren {2:00}:Minuten ", ts.Days, ts.Hours, ts.Minutes)

Of weet iemand een nettere manier om de uitkomst weer tegeven

01:Dagen 00:Uren 15:Minuten