[VBA] klok in een textvak

[Shadowzon]

is het mogelijk om in VBA een realtime klok in een textveld / label te plaatsen?

Zo ja, wie kan mij op weg helpen...

[henkleerssen]

Shadowzon schreef op 25 maart 2004 @ 14:41:
is het mogelijk om in VBA een realtime klok in een textveld / label te plaatsen?

Zo ja, wie kan mij op weg helpen...

tuurlijk kan dat ... maar met welk programma precies? wil je het in een formulier zien of wat? Wat heb je zelf al gedaan? timer control zeg je dat iets?

[Shadowzon]

met acces op een formulier, zelf ben ik nog niet echt verder gekomen dan een statische weergave van de tijd

[GX]

henkleerssen schreef op 25 maart 2004 @ 14:43:
[...]

tuurlijk kan dat ... maar met welk programma precies? wil je het in een formulier zien of wat? Wat heb je zelf al gedaan? timer control zeg je dat iets?

Ik heb nog geen Timer control gezien in VBA.

_gevonden

code:

Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Druk op Ja om 5 seconden te pauzeren", 4)) = vbYes Then
    PauseTime = 5    ' Tijdsduur instellen.
    Start = Timer    ' Aanvangstijd instellen.
    Do While Timer < Start + PauseTime
        DoEvents    ' Overdragen aan andere processen.
    Loop
    Finish = Timer    ' Eindtijd instellen.
    TotalTime = Finish - Start    ' Totaaltijd berekenen.
    MsgBox "Pauze gedurende " & TotalTime & " seconden"
Else
    End
End If

Maar dit is geen Timer zoals in VB (.Net). Probeer er mee te spelen zou ik zeggen.

[ Voor 48% gewijzigd door GX op 25-03-2004 14:56 ]

[henkleerssen]

heel erg basic weer als je het mij vraagt... is weer meer een script request.. je de got search ook al geprobeerd?

[Shadowzon]

volgens mij zal ik het moeten gaan proberen met een activeX control ofzo, wat een realtime clock bestaat niet in VBA

[_js_]

Als eigenschap van een form kun je een timer opgeven, die op 1000ms zetten, en in de timerproc de tijd opnieuw in het tekstvak zetten.