利用timeGetTime函数更精准地计算差

2016-02-19 16:30 61 1 收藏

今天天气好晴朗处处好风光,好天气好开始,图老师又来和大家分享啦。下面给大家推荐利用timeGetTime函数更精准地计算差,希望大家看完后也有个好心情,快快行动吧!

【 tulaoshi.com - 编程语言 】

我想每0.005秒做某一件工作,所以撰写了以下程序:
  Dimtm1AsSingle
  Do
  tm1=Timer
  WhileTimer-tm10.005'等于0.005秒
  DoEvents
  Wend
  ...做某一件工作
  Loop

但实际上,在While循环里面,Timer函数几乎每次都得到相同的时间,只有大约隔了0.05秒才会得到不同的时间,也就是说Timer的准确性只有0.05秒,但我希望进行的工作却是每0.005秒一次,该怎么办呢?可以改用WindowsAPI的timeGetTime函数,此一函数会传回Windows开机以来所经过的时间,时间单位是1/1000秒,举例来说,开机经过2分钟,则传回值等于2*60*1000,timeGetTime的优点是时间可以精确到1/1000秒,所以可以用来解决上述的问题,细节如下:

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

1.API的声明:
  PrivateDeclareFunctiontimeGetTimeLib"winmm.dll"Alias"timeGetTime"
  ()AsLong
  注:如果以上的声明放在「一般模块」底下,应将Declare之前的Private保
  留字去掉。

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

2.程序范例:
  Dimtm1AsLong
  Do
  tm1=timeGetTime
  WhiletimeGetTime-tm15'等于5/1000=0.005秒
  DoEvents
  Wend
  ...做某一件工作
  Loop

->

来源:https://www.tulaoshi.com/n/20160219/1612312.html

延伸阅读
标签: word
在Word中使用函数计算 如下图一样,存在如下的表格。 电脑教程 现在,我们要计算的就是男女生的总人数,所以,把插入条定位在总人数的下面的那个单元格。 然后,执行如下图的菜单操作:表格→公式。 弹出如下图。 上图中,直接输入公式: =Sum(A2,B2) 最后,点击确定按钮,计算结果就出来...
标签: Web开发
%@ page contentType="text/html;charset=gb2312"%  %@ page import="java.text.*"%  %@ page import="java.util.*"%  %  //字符串转化成时间类型(字符串可以是任意类型,只要和SimpleDateFormat中的格式一致即可)  java.text.SimpleDateFormat sdf = new&n...
标签: 电脑入门
在各类比赛中,经常会遇到去掉一个最高分和一个最低分再求平均分的计算方法。 如图1就是某大奖赛的选手评分情况表。 图1 在最后得分一项中,我们可以用LARGE函数或SMALL函数来计算,如在J3中输入下面的公式: =AVERAGE(LARGE(B3:I3,{2,3,4,5,6,7})) 即可以得到正确的结果。 这里,我们介绍ET提供的内部平均值函数TRIMMEAN,使公式更加...
标签: 电脑入门
如图1就是某大奖赛的选手评分情况表。 在最后得分一项中,我们可以用LARGE函数或SMALL函数来计算,如在J3中输入下面的公式: =AVERAGE(LARGE(B3:I3,{2,3,4,5,6,7})) 即可以得到正确的结果。 这里,我们介绍ET提供的内部平均值函数TRIMMEAN,使公式更加简单: =TRIMMEAN(B3:I3,2/8) 下面我们来认识一下TRIMMEAN函数: TRIMMEAN函数的...
标签: ASP
  '****************************** '||Function TimeDiff(sBegin, sEnd) '||本函数计算两个时间的差,可以不用更改直接使用 '||作者:machinecat 2001/10/26 '****************************** '****************************** '注:首先需要判断用户输入的sBegin与sEnd之间的大小 '可以通过DataDiff函数获得两者之间的时间差,不需要进...

经验教程

917

收藏

81
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部