PDA

Vollständige Version anzeigen : verschiedene Zeitgeberintervalle für Felder


YveX
22.10.2001, 11:56
Hi there,

ich habe in einem Formular eine Uhr eingeblendet. Deshalb habe ich in diesem Form auch das Zeitgeberintervall auf 1000 (ms) gesetzt.
Nun möchte ich ein anderes Feld in diesem Form nur alle 10 Sekunden aktualisieren!

Wie mache ich das?!

MarioR
22.10.2001, 12:28
Hallo Yve,

so funktionierts:


im Deklarationsteil des Klassenmoduls zum Formular:

Option Compare Database
Option Explicit
Dim bytZaehler As Byte


Im Formularereignis Beim Laden:

Private Sub Form_Load()
...
bytZaehler = 0
...
End Sub


Im Formularereignis Bei Zeitgeber:

Private Sub Form_Timer()
If bytZaehler = 10 Then
'hier kommt Deine Aktion rein
End If
bytZaehler = IIf(bytZaehler = 10, 0, bytZaehler + 1)
End Sub

YveX
22.10.2001, 12:50
Wow,

danke vielmals Mario

hat wunderbar geklappt!!

Gruss, YveX