Re: Rekenen met tijden in VB.NET

Article View: be.comp.programming

Article #634

Back to be.comp.programming Previous Next

#634

From: Dr.Ruud
Date: Fri, 30 Jun 2006 14:29

38 lines
2143 bytes

StriKe schreef:

> Dim t1 As TimeSpan = New TimeSpan(txtUren.Text, txtMinuten.Text,
> txtSeconden.Text)
>
> Dim t2 As Long = t1.TotalMilliseconds
>
> Ik heb de long dus in milliseconden gezet

OK. Er zitten 24*60*60*1000=8.64E7 ms in een dag, dus in 32 bits (4.3E9)
past dan zo'n 50 jaar.


> MsgBox(t2)
>
> Deze geeft de waarde die in de float is opgeslagen weer zoals het
> hoort
>
> Dim ts As New TimeSpan
> ts = New TimeSpan(t2 * TimeSpan.TicksPerHour)
> MsgBox(ts.Hours)
>
> Hier krijg ik nog steeds 0, terwijl ik een float waarde had van
> 151310000 had, dat zou meer dan 4 uur moeten zijn

Die TicksPerHour zijn niet in milliseconden, maar in 100 nanoseconden.
Maar daar moet je niet mee gaan rekenen, dat moet je als 'private'
beschouwen.

Probeer het zo eens:

  TimeSpan ts As New TimeSpan(0,0,0,0,t2)
  MsgBox(ts.Hours)

-- 
Affijn, Ruud

"Gewoon is een tijger."

Technical Details

Message-ID: <e83jno.1k8.1@news.isolution.nl>

Path:

arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!news.glorb.com!newsgate.cistron.nl!xs4all!transit4.news.xs4all.nl!post.news.xs4all.nl!not-for-mail

References:

<mn.bb8a7d668dee37b9.48459@internetfreakz.be.invalid> <2Ydng.279368$Gz1.48566@blueberry.telenet-ops.be> <mn.f1bd7d666c0c7251.48459@internetfreakz.be.invalid> <mn.f1dc7d66a1f7da81.48459@internetfreakz.be.invalid> <e831n1.1kk.1@news.isolution.nl> <mn.f3607d666b17a299.48459@internetfreakz.be.invalid>

Show Full Headers

Complete Article Headers

X-Google-Thread: fcea4,4b6663fadffd6440
X-Google-Thread: 107324,4b6663fadffd6440
X-Google-Attributes: gidfcea4,gid107324,public
X-Google-Language: DUTCH,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!news.glorb.com!newsgate.cistron.nl!xs4all!transit4.news.xs4all.nl!post.news.xs4all.nl!not-for-mail
Message-ID: <e83jno.1k8.1@news.isolution.nl>
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Newsgroups: be.comp.programming,nl.comp.programmeren
References: <mn.bb8a7d668dee37b9.48459@internetfreakz.be.invalid> <2Ydng.279368$Gz1.48566@blueberry.telenet-ops.be> <mn.f1bd7d666c0c7251.48459@internetfreakz.be.invalid> <mn.f1dc7d66a1f7da81.48459@internetfreakz.be.invalid> <e831n1.1kk.1@news.isolution.nl> <mn.f3607d666b17a299.48459@internetfreakz.be.invalid>
Subject: Re: Rekenen met tijden in VB.NET
Date: Fri, 30 Jun 2006 16:29:28 +0200
Organization: Chaos rules.
X-Newsreader: WMDIYB
X-Archive-Me: please
Approved: yesterday
X-Face: &CQ$FIr!=+=w,8`0Q^Ug"1>F[(/op8->E;NQet`5fe$;=e*!Z5&REvp<~Tj|"Y[|8OcJ{w#z&mB7B:I)XO*%_|\]|YW$C>>$Q[9-#K~c$tQ^Mf0,wMo?h\C)TE>f
Lines: 40
NNTP-Posting-Host: 194.109.164.102
X-Trace: 1151678406 news.xs4all.nl 31642 [::ffff:194.109.164.102]:37912
X-Complaints-To: abuse@xs4all.nl

Reply to Parent Message