各位高手,麻烦看一下这段vb代码啥意思,用来干嘛??
Private Declare Function timeGetTime Lib "winmm.dll" () As Long 'timeGetTime api
[解决办法]
申明API函数。
调用 winmm.dll 中的 timegettime 函数。
[解决办法]
timeGetTime timeGetTime:函数以毫秒计的系统时间。该时间为从系统开启算起所经过的时间。 DWORD timeGetTime(VOID); 参数:无参数。 返回值:以毫秒值返回系统时间。 备注:该函数与timeGetSystemTime函数的唯一不同是timeGetSystemTime函数使用MMTIME结构返回系统时间。TimeGetSystemTime比timeGetTime需要更多的系统开销。注意timeGetTime函数是一个双字。这个值在0到2^32之间。大约49.71天。如果在代码中直接将该值用于计算,会导致一些问题,特别是用该值来控制代码的执行。一般利用两个timeGetTime函数返回值的不同来用于计算。 Windows NT:该函数的时间精度是五毫秒或更大一些,这取决于机器的性能。可用timeBeginPeriod和timeEndPeriod函数提高timeGetTime函数的精度。如果使用了,连续调用timeGetTime函数,一系列返回值的差异由timeBeginPeriod和timeEndPeriod决定。QueryPerformanceCounter QueryPerformanceFrequency函数用于分辨率要求更高的时间测量。 Windows95 默认分辨率是1毫秒,无论是否调用timeBeginPeriod和timeEndPeriod函数。 timeGetTime函数 函数功能:该函数得到定时器的当前值。timeGetTime返回值的单位是1ms 函数原型:Public Declare Function timeGetTime Lib "winmm.dll" () As Long 例如:实现延时 Public Declare Function timeGetTime Lib "winmm.dll" () As Long Public Sub Delay(ByVal num As Integer) Dim t As Long t = timeGetTime Do Until timeGetTime - t >= num DoEvents Loop End Sub