当前位置: 首页 > 编程笔记 >

VBA中的Timer函数用法

闽念
2023-03-14
本文向大家介绍VBA中的Timer函数用法,包括了VBA中的Timer函数用法的使用技巧和注意事项,需要的朋友参考一下

第1.40例 Timer 函数

一、题目:

  要求编写一段代码,运用 Timer 函数来计算本代码运行所化的时间。

二、代码:

Sub 示例_1_040()
  Dim t, i&, a
  t = Timer
  For i = 1 To 1000000
    a = a + i
  Next i
  MsgBox Timer - t & "秒"  ‘返回0.046875秒
End Sub

三、代码详解

1、Sub 示例_1_040():宏程序的开始语句。宏名为示例_1_040。
2、Dim t, i&, a  :声明变量t,a 均为可变型变量,i为长整型变量。
3、t = Timer :把系统的时间赋给变量t。
4、For i = 1 To 1000000 :从1 到 1000000循环
5、a = a + i :把a+i的值赋给变量a,实际上是一个累加的过程。
6、MsgBox Timer - t & "秒" :利用消息框显示现在的时间减去前面设置的时间,得到运行整个代码所化的时间。

Timer 函数

返回一个 Single,代表从午夜开始到现在经过的秒数。

Timer
说明
Microsoft Windows中,Timer函数返回一秒的小数部分。

 类似资料:
  • 主要内容:函数定义函数是一组可重复使用的代码,可以在程序中的任何地方调用。这消除了一遍又一遍地编写相同的代码的需要。这使程序员能够将一个大程序划分成许多小的可管理的功能模块。 除了内置函数外,VBA还允许编写用户定义的函数。 在本章中,我们将学习如何在VBA中编写自己的函数。 函数定义 一个VBA函数可以有一个可选的语句。如果要从函数返回值,则可使用语句。 例如,可以在一个函数中传递两个数字,然后从函数中返回它们的

  • 主要内容:日期函数,时间函数VBScript日期和时间函数帮助开发人员将日期和时间从一种格式转换为另一种格式,或以适合特定条件的格式表示日期或时间值。 日期函数 编号 函数 描述 1 Date 一个函数,它返回当前的系统日期。 2 CDate 一个函数,将给定的输入转换为日期。 3 DateAdd 一个函数,它返回一个指定的时间间隔被添加的日期。 4 DateDiff 一个函数,它返回两个时间段之间的差异。 5 DatePa

  • 我正在制作我的第一个VBA程序,并尝试运行下面的函数。该函数检查第一行的特定命名范围,第一行的值不大于它的前导值,但小于1。 我知道函数做了它应该做的事情,因为我手动检查了值表,从MsgBox中删除了注释',并在函数遍历表时使用调试工具对函数的每个步骤进行了输入和输出。但是,当我在Excel中使用引用函数时,我会得到一个错误。当我开始键入它的名称时,函数甚至会显示在函数自动完成框中。当我编写其他函

  • 本文向大家介绍.NET中的Timer类型用法详解,包括了.NET中的Timer类型用法详解的使用技巧和注意事项,需要的朋友参考一下 在.NET FrameWork中有多个Timer,那么怎么根据实际情况进行选择确实是一个问题。 总体而言,计时器共有以下四种: 多线程计时器: 1 System.Threading.Timer 2 System.Timers.Timer 特殊环境的单线程计时器: 1

  • 主要内容:数组声明,赋值给数组,多维数组,ReDim语句,数组方法我们都知道,一个变量是一个存储值的容器。 有时,开发人员希望一次可以在一个变量中保存多个值。 当一系列值存储在单个变量中时,则称为数组变量。 数组声明 数组声明的方式与声明变量相同,只是数组变量的声明使用括号。 在下面的例子中,括号里提到了数组的大小。参考以下示例 - 在上面代码中, 虽然数组大小被指定为,但是当数组索引从零开始时,它可以保持个值。 数组索引不能是负数。 VBScript数组可以在

  • 在尝试理解async/await时,我尝试了这段代码,但它的行为与我预期的不一样。 我希望控制台在2秒后显示done1,然后在done1后2.5秒显示done2。相反,它在2秒内显示done1,在那之后0.5秒显示done2。为什么它会这样,因为我在显示第一个之后等待第二个setTimeout?