重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
这篇文章主要讲解了“.Net CF下精确的计时器怎么使用”,文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习“.Net CF下精确的计时器怎么使用”吧!
创新互联专注于翠屏网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供翠屏营销型网站建设,翠屏网站制作、翠屏网页设计、翠屏网站官网定制、成都微信小程序服务,打造翠屏网络公司原创品牌,更为您提供翠屏网站排名全网营销落地服务。
.Net CF下精确的计时器
用法:
Dim t as New AtomicCF.Timer t.start() ....'Some functions here Dim TimeLapsed as Long = t.stop()
代码:
Imports System.Runtime.InteropServices Namespace AtomicCF Public Class Timer_ Public Shared Function QueryPerformanceCounter(ByRef perfCounter As Long) As Integer End Function _ Public Shared Function QueryPerformanceFrequency(ByRef frequency As Long) As Integer End Function Private m_frequency As Int64 Private m_start As Int64 Public Sub New() If QueryPerformanceFrequency(m_frequency) = 0 Then Throw New ApplicationException End If 'Convert to ms. m_frequency = CLng(m_frequency / 1000) End Sub Public Sub Start() If QueryPerformanceCounter(m_start) = 0 Then Throw New ApplicationException End If End Sub Public Function [Stop]() As Int64 Dim lStop As Int64 = 0 If QueryPerformanceCounter(lStop) = 0 Then Throw New ApplicationException End If Return CLng((lStop - m_start) / m_frequency) End Function End Class End Namespace
感谢各位的阅读,以上就是“.Net CF下精确的计时器怎么使用”的内容了,经过本文的学习后,相信大家对.Net CF下精确的计时器怎么使用这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是创新互联,小编将为大家推送更多相关知识点的文章,欢迎关注!