Funkcja Timer

Funkcja Timer zwraca wartość typu Single określającą ilość sekund jakie upłynęły od północy.

Składnia funkcji Timer:

Timer

Funkcja Timer może być wykorzystywana np. do pomiaru czasu trwania operacji. Jeżeli jej wartość zostanie pobrana przed i po wykonaniu operacji to różnica pobranych wartości będzie określała czas wykonania operacji w sekundach. W przypadku zmiany dnia między pierwszym i drugim pobraniem wartości funkcji Timer otrzymany wynik będzie niepoprawny.

Przykład użycia funkcji Timer:

Dim varCzasPoczatkowy, varCzasKoncowy
Dim intMsg As Integer
varCzasPoczatkowy = Timer
  'pobierz czas poczatkowy
intMsg = MsgBox("Wcisnij szybko OK")
  'wyswietl okno
varCzasKoncowy = Timer
  'pobierz czas koncowy
intMsg = MsgBox("Potrzebowales " & (varCzasKoncowy - varCzasPoczatkowy) & " sekund")
  'oblicz różnicę i wyświetl

(Zmienne, typy zmiennych i funkcja MsgBox() zostały opisane w innych częściach kursu.)

na górę strony...