🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #12439

Re: [vb] hoe een tijd meten

#12439
From: Pieter Philippaerts
Date: Sat, 10 Nov 2001 18:01
44 lines
2786 bytes
Een van de meest gemakkelijke methodes is om de API functie GetTickCount
te gebruiken. Deze functie geeft een getal terug dat aangeeft hoeveel
milliseconden
Windows al opstaat.
Je kan dit dus gemakkelijk gebruiken om te timen:

Private Declare Function GetTickCount Lib "kernel32" () As Long
    dim tStart as long, tStop as long
    tStart = GetTickCount()
    ' Doe uw ding
    tEnd = GetTickCount()
    TijdNodigGehad = tStop - tStart ' in milliseconden

Mvg,
Pieter Philippaerts
http://www.allapi.net/

"Pieter Huygens" <phuygens@pandora.be> wrote in message
news:tgcH7.17020$XM4.736@afrodite.telenet-ops.be...
> Beste usenetters,
>
> Ik ben een in visual basic een kleine meter aan het maken.
> Het moet de snelheid van de internetverbinding meten.
> Hij werkt alsvolgt:
> het download een file van een server (verschillende servers eigenlijk) die
> altijd *exact* 1 megabyte is.
> Dan zou hij om de snelheid van je verbinding te weergeven, de kilobytes
> (grootte van de file dus) moeten delen door het aantal seconden of ev.
> minuten dat de overdracht heeft geduurt.
> Daarvoor ben ik opzoek naar een soort van methode die me toelaat een timer
> aan te zetten, een chronometer eigenlijk.
> Die ik in de vb code kan aanzetten en ook kan stopzetten, en die dan in
een
> variabele ofzo het aantal seconden weergeeft
> Voor de nauwkeurigheid zouden de seconden dat de overdracht heeft geduurt
> moeten weergeven worden in miliseconden.
>
> Iemand een idee hoe zoiets te doen is?
> Met een eenvoudige Timer is dat niet te doen volgens mij, of ben ik mis?
>
> Alvast bedankt voor de hulp!
> Pieter Huygens
>
>
Technical Details
Message-ID: <RSdH7.412$XV.11264@news.chello.be>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!195.86.7.162!newsfeed.wirehub.nl!newshub1.nl.home.com!news.nl.home.com!news-feed.nld.sonera.net!amsnews01.chello.com!news.chello.be!not-for-mail
References: <tgcH7.17020$XM4.736@afrodite.telenet-ops.be>

Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,1541a09f1334ff8
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2001-11-10 09:59:39 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!195.86.7.162!newsfeed.wirehub.nl!newshub1.nl.home.com!news.nl.home.com!news-feed.nld.sonera.net!amsnews01.chello.com!news.chello.be!not-for-mail
Reply-To: "Pieter Philippaerts" <Pieter@allapi.net>
From: "Pieter Philippaerts" <Pieter@allapi.net>
Newsgroups: be.comp.programming
References: <tgcH7.17020$XM4.736@afrodite.telenet-ops.be>
Subject: Re: [vb] hoe een tijd meten
Lines: 46
Organization: The KPD-Team
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <RSdH7.412$XV.11264@news.chello.be>
Date: Sat, 10 Nov 2001 19:01:09 +0100
NNTP-Posting-Host: 195.162.214.182
X-Complaints-To: abuse@chello.be
X-Trace: news.chello.be 1005414961 195.162.214.182 (Sat, 10 Nov 2001 18:56:01 MET)
NNTP-Posting-Date: Sat, 10 Nov 2001 18:56:01 MET