Srodne teme

14.04.2024. Re: Gde je Kejt? (samo pogrešni odgovori)
19.05.2001. Ikona u Sys Tray-u?
23.04.2002. Kako Ograniciti Vreme RAS User-u???
27.03.2009. [Anketa]: Vreme provedeno na Internetu
30.08.2003. sys.exe
02.11.2003. MSDOS.SYS, IO.SYS
08.01.2004. Brojac za program za igraonice
13.01.2004. Cene telefonskih impulsa
25.02.2004. Windows XP logo slike - izmena
10.05.2006. Kako da u XP-u u command promptu kucam nasa slova?

Navigacija

Brisanje liste

Lista poslednjih: 16, 32, 64, 128 poruka.

GetTickCount ili provedeno vreme na sys ...

[es] :: Visual Basic 6 :: GetTickCount ili provedeno vreme na sys ...

[ Pregleda: 2397 | Odgovora: 4 ] > FB > Twit

Autor

`and

Član broj: 32490
Poruke: 776
*.vdial.verat.net

Sajt: www.bitbyterz.org

Profil

GetTickCount ili provedeno vreme na sys ...

^{25.08.2004. u 00:39 - pre 239 meseci}

E treba mi za nesto provedeno na racunaru ... i tako ja kopam ... dodjem do GetTickCount funkcije u Kernel-u i dobijem provedeno vreme u milisecundama ... i sad me zanima ( ne ide mi bas sada nesto ova logika/matematika ) da li ima bolje resenje od ovoga :

Code:

Private Sub Timer1_Timer()

s = CInt(GetTickCount / 1000)

h = (s - (s Mod 3600)) / 3600
m = (s - (s Mod 60)) / 60 - (h * 60)
sc = s - (m * 60) - (h * 3600)

Label1.Caption = h & " : " & m & " : " & sc

End Sub

thx

_{[Ovu poruku je menjao mladenovicz dana 25.08.2004. u 10:54 GMT]}

Odgovor na temu

vujkev
Beograd

Član broj: 8072
Poruke: 1347
*.telekom.yu

+104 Profil

Re: GetTickCount ili provedeno vreme na sys ...

^{25.08.2004. u 07:13 - pre 239 meseci}

Možda ovako?

Code:
Private Sub Timer1_Timer()

s = CInt(GetTickCount / 1000)

h = cInt(s/3600)
m = cInt((s - h*3600) / 60)
s = cInt(s - h*3600 - m*60)

Label1.Caption = h & " : " & m & " : " & s

End Sub

Naučio sam...
Da je važnije biti ljubazan nego biti u pravu

Odgovor na temu

mladenovicz
Zeljko Mladenovic
Xoran Technologies, Inc., Ann Arbor, MI,
USA / Software Engineer
Ann Arbor, MI, USA

Član broj: 6598
Poruke: 2065
*.bg.wifi.vline.verat.net.

Jabber: mladenovicz@elitesecurity.org
ICQ: 95144142
Sajt: yubc.net/~mz

Profil

Re: GetTickCount ili provedeno vreme na sys ...

^{25.08.2004. u 10:03 - pre 239 meseci}

Code:

Private Sub Timer1_Timer()
   Dim dTicks     As Double

   dTicks = GetTickCount / 1000 / 60 / 60 / 24

   Label1.Caption = Format(dTicks, "HH:MM:SS")
End Sub

Blue Man Group

Odgovor na temu

vujkev
Beograd

Član broj: 8072
Poruke: 1347
*.telekom.yu

+104 Profil

Re: GetTickCount ili provedeno vreme na sys ...

^{25.08.2004. u 10:33 - pre 239 meseci}

covek jednostavno ne prestaje da me odusevljava