VBA 怎么计算一段代码运行需要的时间

VBA 如何计算一段代码运行需要的时间？
欲计算一个多嵌套循环所花的时间（毫秒），请问如何操作？

[解决办法]
想要更精确用这个

VB code

Private Declare Function GetTickCount Lib "kernel32" () As LongPrivate Sub Form_Load()Dim dt As Longdt = GetTickCount'循环代码Debug.Print "用时：" & GetTickCountd - dtEnd Sub