Hej

Jag har fått en fråga från en idrottsklubb, om jag kan göra ett program som tar start och stopp tid.

Har hittat har en grej som kopplas mot gameporten och knapp 1.

Min fråga är om timer som följer med vb är tillräckligt snabb för detta ändamål.

Mvh
Tobbe

Antagligen inte, gör istället så att du tar t.ex. apiet

Declare Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Long

för att få antalet millisekunder sedan windows startades. Vid "start" av uret så sparas tiden undan. Använd sedan en timer för att uppdatera en caption eller liknande med
sparat värder - nuvarande värde
och formatera sedan det till timmar:minuter:sekunder:millisekunder

Vid stop så slutar du helt enkelt att köra timern och räknar ut
sparat värder - nuvarande värde
och formaterar det...

:)

Förlåt, nuvarande värde - sparat värde skall det vara...

Hej

Jag tackar för inlägget

"Men jag är nog dum i huvet just nu eller alltid!"

Jag får inte till ett format på detta

starttid = 6257648
stoptid = 6261473
diff = 3825

Hur får jag till ett tid format på detta som visa formatet 00:00:38:25 ?

Hälsningar
Tobbe

Format$(diff, "00:00:00:00")

men du måste omvandla så du får timmar, minuter och därefter sekunder.

Har för mig att det behandlats förut här på forumet. Prova och sök.

Du borde få ut millisekunderna genom att använda

lngMS = diff mod 1000 'ms
lngS = (diff - lngMS) / 1000 's
lngMin = (diff - lngMS - lngS * 1000) / 60 'min
lngH = (diff - lngMS - lngS * 1000 - lngMin * 1000 * 60) / 60'h
lngH = lngH mod 24 'h
lngMin = lngMin mod 60 'min
lngS = lngS mod 60's


Har INTE testat det här, stämmer antagligen inte, men nå't sådant borde det vara hoppas jag... ;)

Gör nåt sånt här istället så är det enklare att se det:

<code>
MSTotal= ... 'så du får fram dem
MS=MSTotal Mod 1000
STotal = (MSTotal-MS) \ 1000
S=SekTotal Mod 60
MTotal = (STotal-S) \ 60
M=MTotal Mod 1000
HTotal = (MTotal-M) \ 60
och här kan du fortsätta med dygn osv.
</code>

Tack för alla svar

Jag pular på och ser om jag får till något vettigt!

Mvh
Tobbe