Увидеть милисекунды

DavidKats
Дата: 20.11.2009 19:19:46
Хочу найти в коде тормозящие куски. Для этого понатыкал между ними счетчики времени. Но оператор Time показывает время с точностью до секунды. А как можно повысить точность до милисекунд?
ILL HEAD
Дата: 20.11.2009 19:32:22
см. API функцию timeGetTime
mds_world
Дата: 20.11.2009 19:38:54
VBA.Timer дает до сотых долей секунды
ILL HEAD
Дата: 20.11.2009 19:41:39
ILL HEAD
см. API функцию timeGetTime
Sub t()
Dim lngT As Long
    lngT = timeGetTime
    MsgBox "Привет"
    MsgBox "Привет. Между сообщения прошло " & timeGetTime - lngT & " ms"
End Sub
ILL HEAD
Дата: 20.11.2009 19:48:08
Сорри (было бы исправление сообщений ... ) забыл это:
' в начале (в разделе declarations) модуля 
Private Declare Function timeGetTime Lib "winmm.dll" () As Long
DavidKats
Дата: 20.11.2009 20:52:14
ILL HEAD,
Спасибо! Это помогло! :)