VB2010实现精确计时

刚刚从VB6踏入VB2010，有很多地方不明白。
在VB6中的QueryPerformanceFrequecy和QueryPerformanceCounter函数的定义以及调用如何在VB2010中实现？
按照VB6的规则编写代码在VB2010中不能通过啊？
求高人指点！
VB6中的函数如何转换为VB2010中可以使用的？