网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

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

这篇文章主要讲解了“.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下精确的计时器怎么使用这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是创新互联,小编将为大家推送更多相关知识点的文章,欢迎关注!


网站题目:.NetCF下精确的计时器怎么使用
文章链接:http://bjjierui.cn/article/pogips.html

其他资讯