千家信息网

.Net CF下精确的计时器怎么使用

发表于:2025-12-01 作者:千家信息网编辑
千家信息网最后更新 2025年12月01日,这篇文章主要讲解了".Net CF下精确的计时器怎么使用",文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习".Net CF下精确的计时器怎么使用"吧!.Ne
千家信息网最后更新 2025年12月01日.Net CF下精确的计时器怎么使用

这篇文章主要讲解了".Net CF下精确的计时器怎么使用",文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习".Net CF下精确的计时器怎么使用"吧!

.Net CF下精确的计时器

用法:

Dim t as New AtomicCF.Timert.start()....'Some functions hereDim TimeLapsed as Long = t.stop()

代码:

Imports System.Runtime.InteropServicesNamespace AtomicCFPublic Class Timer _Public Shared Function QueryPerformanceCounter(ByRef perfCounter As Long) As IntegerEnd Function _Public Shared Function QueryPerformanceFrequency(ByRef frequency As Long) As IntegerEnd FunctionPrivate m_frequency As Int64Private m_start As Int64Public Sub New()If QueryPerformanceFrequency(m_frequency) = 0 ThenThrow New ApplicationExceptionEnd If'Convert to ms.m_frequency = CLng(m_frequency / 1000)End SubPublic Sub Start()If QueryPerformanceCounter(m_start) = 0 ThenThrow New ApplicationExceptionEnd IfEnd 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下精确的计时器怎么使用这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是,小编将为大家推送更多相关知识点的文章,欢迎关注!

0