labanTek
Instructor
- Dec 3, 2004
- 37
Hi all I was observing the following code for a countdown timer, can anyone explain how does importing this Lib "kernel32" library into the function, cause an initial time to be returned? I would like to find out more about is contained within these libraries. Part of the code is below.
Any help will be appreciated. Thanks in advance.
Option Compare Database
Option Explicit
Dim TotalElapsedMilliSec As Long
Dim StartTickCount As Long
Private Declare Function GetTickCount Lib "kernel32" () As Long
Private Sub btnStartStop_Click()
If Me.TimerInterval = 0 Then
StartTickCount = GetTickCount()
Any help will be appreciated. Thanks in advance.
Option Compare Database
Option Explicit
Dim TotalElapsedMilliSec As Long
Dim StartTickCount As Long
Private Declare Function GetTickCount Lib "kernel32" () As Long
Private Sub btnStartStop_Click()
If Me.TimerInterval = 0 Then
StartTickCount = GetTickCount()