windows 中得到一个操作所使用的精确时间

QueryPerformanceCounter()这个函数返回高精确度性能计数器的值,它可以以微妙为单位计

时.但是QueryPerformanceCounter()确切的精确计时的最小单位是与系统有关的,所以,必须

要查询系统以得到QueryPerformanceCounter()返回的嘀哒声的频率.

QueryPerformanceFrequency()提供了这个频率值,返回每秒嘀哒声的个数.

计算确切的时间是从第一次调用QueryPerformanceCounter()开始的假设得到的LARGE_INTEGER   为nStartCounter,过一段时间后再次调用该函数结束的,设得到nStopCounter.两者之差除以QueryPerformanceFrequency()的频率就是开始到结束之间的秒数.由于计时函数本身要耗费很少的时间,要减去一个很少的时间开销.但一般都把这个开销忽略.

公式如下:  
                                nStopCounter-nStartCounter  
    ElapsedTime=------------------------------------     -   overhead  
                                        frequency  
   
  double   time=(nStopCounter.QuadPart-nStartCounter.QuadPart)/frequency.QuadPart

假设要测试某个算法的消耗时间,设函数名是function()

 
 LARGE_INTEGER nStartCounter;  
 ::QueryPerformanceCounter(&nStartCounter);
 LARGE_INTEGER nFrequency;
 ::QueryPerformanceFrequency(&nFrequency);

function();

LARGE_INTEGER nStopCounter;

::QueryPerformanceCounter(&nStopCounter);

 double nTime = 1000 * (nStopCounter.QuadPart - nStartCounter.QuadPart) / nFrequency.QuadPart;

printf("测试时间为%.2f 秒",nTime / 1000);

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
您可以使用VBA的`Timer`函数来获取当前时间,但是它只能精确到秒级,无法达到微秒级的精度。要在VBA获取微秒级的时间,您可以使用Windows API函数来实现。 以下是一个示例代码,演示如何使用Windows API函数获取微秒级的时间: ```vba Option Explicit #If VBA7 Then Declare PtrSafe Sub GetSystemTimePreciseAsFileTime Lib "kernel32" (ByRef lpSystemTimePrecise As FILETIME) #Else Declare Sub GetSystemTimePreciseAsFileTime Lib "kernel32" (ByRef lpSystemTimePrecise As FILETIME) #End If Private Type FILETIME dwLowDateTime As Long dwHighDateTime As Long End Type Function GetPreciseTime() As Double Dim systemTime As FILETIME Dim currentTicks As Double GetSystemTimePreciseAsFileTime systemTime currentTicks = (systemTime.dwHighDateTime * 2 ^ 32 + systemTime.dwLowDateTime) / 10 ' 转换为微秒 GetPreciseTime = currentTicks End Function Sub Test() Dim startTime As Double Dim endTime As Double startTime = GetPreciseTime() ' 这里放置您要测试的代码 endTime = GetPreciseTime() MsgBox "代码执行时间(微秒): " & endTime - startTime End Sub ``` 在上面的示例代码,`GetSystemTimePreciseAsFileTime`函数从系统获取当前时间精确到纳秒级),然后通过转换计算得到微秒级的时间。`GetPreciseTime`函数返回当前时间的微秒数。您可以在`Test`子过程放置您要测试的代码,在执行结束后,会弹出一个消息框显示代码执行的时间(单位为微秒)。 请注意,`GetSystemTimePreciseAsFileTime`函数在Windows 8及更高版本的操作系统可用。如果您的操作系统不支持此函数,您可以考虑使用其他方法来获取微秒级的时间,例如使用第三方库或插件。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值