急请高手帮忙，问好多人无解啊！！
--------------------编程问答-------------------- 你的timeGetTime方法精確到什麼，秒？把毫秒也取出來，還會一樣嗎？ --------------------编程问答-------------------- --------------------编程问答--------------------
Option Explicit
Dim lngStart As Long
Dim lngEnd As Long
Private Declare Function GetTickCount Lib "kernel32" () As Long
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
lngStart = GetTickCount
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
lngEnd = GetTickCount
Me.Caption = CStr(lngEnd - lngStart) & "ms"
End Sub
补充：VB , 基础类
