各位高手，麻烦看一下这段vb代码啥意思，用来干嘛？？

Question

    Private Declare Function timeGetTime Lib "winmm.dll" () As Long     'timeGetTime api

Answer 1

申明API函数。调用 winmm.dll 中的 timegettime 函数。

Answer 2

那winmm.dll和timegettime 函数一般用来干嘛（新手）

Answer 3

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