Total Tid

[Jenny R]

MEn du... alltså.. vi har gått igenom det här massor av gånger nu.

 

nAntalTim = cInt(nTotAntalMin/60)

skall ge dig 3. nTotAntalMin/60 ger dig EGENTLIGEN 3.1333333....... men genom att du kör cInt innan så skall det bli endast 3. Alternativt, testa

nAntalTim = FormatNumber(nAntalTim,0) 

Det bör också ge dig 3.

 

nAntalMin = nTotAntalMin - (nAntalTim * 60)

skall ge dig minuterna.

 

Presentera sen båda.

 

[inlägget ändrat 2003-11-10 14:57:26 av Jenny R]

[Neee!!]

Verkar funka men har ett problem kvar?

01:20

00:45

00:45

03:23

01:45

08:00

 

Ger mig 16,-2

Det borde ge

15,58 timmar

 

Såg att 01.45 ger mig 2,-15..

 

Skumt

 

[inlägget ändrat 2003-11-10 15:18:09 av Neee!!]

[Magnus Gladh]

Jag hoppar in här innan Jenny dör

 

CInt() kan avrunda uppåt. Alltså om du tar CInt("19.8") så får du 20 och inte 19. Och det är det felet du får här.

 

Använd dig av Int() bara så avrundas du alltid neråt (vid positiva tal) Fix() gör samma sak, men avrundar alltid "neråt" (det är egentligen uppåt, men strunt i det) vid negativa tal.

 

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vsfctint.asp

 

- Magnus

-----------------------------------------------------

Ropen skalla, BBB (eller BOSTREAM) åt alla!!!

 

[Neee!!]

Tack alla...

Om man nu skulle kunna få Totalvariablen till formatet

15:05 istället för 15,5 nu så skulle man kunna stänga denna långa tråd...phu...

 

[Jenny R]

Tack Som jag tidigare påpekat anade jag att det var cInt:en som kunde spöka lite..skönt med lite input.

 

Dock - nTmp= FormatNumber(nTmp,0) borde väl också funkat?