Kuinka saa kellon jossa on sekunnin tuhannesosat?
kun ei taida tuolla tavan timerillä saada :/
Timer
Oppilas
4
430
Vastaukset
- Orwell
Tällä API-funktiolla saat aika tarkan ajan.
Private Declare Sub GetLocalTime Lib "kernel32" (lpSystemTime As SYSTEMTIME)
Private Type SYSTEMTIME
wYear As Integer
wMonth As Integer
wDayOfWeek As Integer
wDay As Integer
wHour As Integer
wMinute As Integer
wSecond As Integer
wMilliseconds As Integer
End Type- Oppilas
En saanut toimimaan, voisitko selittää mitenkä tuo pitää tehdä? =)
- Orwell
Oppilas kirjoitti:
En saanut toimimaan, voisitko selittää mitenkä tuo pitää tehdä? =)
En tiedä mitä haluat oikein tehdä, mutta ao. koodinpätkä näyttää juoksevan ajan.
Lisää formille Timer- ja Label-kontrolli ja aseta Timer-kontrollin Interval-arvo 1.
Private Sub Timer1_Timer()
Dim sys As SYSTEMTIME
Call GetLocalTime(sys)
Label1.Caption = sys.wHour & ":" & sys.wMinute & ":" & sys.wSecond & ":" & sys.wMilliseconds
End Sub - vbguru
Oppilas kirjoitti:
En saanut toimimaan, voisitko selittää mitenkä tuo pitää tehdä? =)
Print Time & ":" & Replace(Round(Timer - Int(Timer), 3), "0,", "")
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 2024248
SDP haluaa 40 000 nettomaahanmuuttajaa
SDP:n Suunnanmuutos-vaihtoehtobudjetissa, käy ilmi, että demarit itse asiassa vaativat räjähdysmäistä ”työperäisen” maah1463798Orpo: Velkajarrua vastustavaa puoluetta vaikea ajatella hallitukseen
No Minja Koskelan kommunistipuolue jäi ulos tuosta. Kaikki eduskuntapuolueet vasemmistoliittoa lukuun ottamatta sopivat1363245Hienoa! Eduskunta luopui käteisen käytöstä
Nyt tuo sama muutos pitää saada myös muuhun yhteiskuntaan. Käteistähän ei tarvitse tänä päivänä enää kuin rikolliset.471629Ikävä sinua mies
Vuosia kuluu, mutta tunteet ei ole hävinnyt. Tasoittuneet toki, kun ei olla nähty. Järki palannut päähän kuitenkin. Se i191508Mikä tämä henkilö mahtaa touhuta Parkanossa
Kamalaa https://www.ylasatakunta.fi/teksti/pirkanmaan-karajaoikeus-vangitsi-koiran-tappamisesta-epaillyn-6.68.127794.b58341450Sulla on avaimet ja keinot
Jos haluat jatkaa tutustumista. Itse olen niin jäässä etten pysty tekemään enää mitään. Pidempi keppi johon on helpompi251385Orpo loukkaantui fasismiin viittaavasta sanavalinnasta
Mutta miksi loukkaantui? Orpohan on tehnyt yhteistyötä fasistien kanssa jo vuonna 2019, siis jo neljä vuotta ennen loukk271351Kiinnostaa - ei kiinnosta - kiinnostaapas
Selittäkää hämmentyneelle miksi miehiä ei ikinä kiinnosta silloin, kun sitä olisi itsekin kiinnostunut? Sitten kun siirt1161160Martina haluaa Marbellaan
Martinan tekisi mieli ottaa lennot Marbellaan, jossa näkisisi kauniita ja hyväntuulisia ihmisiä. No sitten pitää matkust2151063