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中的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,
-
php中mt_rand()随机数函数用法
本文实例讲述了php中mt_rand()随机数函数用法.分享给大家供大家参考.具体分析如下: mt_rand() 使用 mersenne twister 算法返回随机整数. 语法:mt_rand(min,max) 说明:如果没有提供可选参数 min 和 max,mt_rand() 返回 0 到 rand_max 之间的伪随机数,例如想要 5 到 15(包括 5 和 15)之间的随机数,用 mt_rand(5,15). 在 3.0.7 之前的版本中,max 的含义是 range,要在这些版本中得到
-
golang中strconv.ParseInt函数用法示例
本文实例讲述了golang中strconv.ParseInt函数用法.分享给大家供大家参考,具体如下: golang strconv.ParseInt 是将字符串转换为数字的函数,功能灰常之强大. 参数1 数字的字符串形式 参数2 数字字符串的进制 比如二进制 八进制 十进制 十六进制 参数3 返回结果的bit大小 也就是int8 int16 int32 int64 func ParseInt(s string, base int, bitSize int) (i int64, err erro
-
C#多线程之Thread中Thread.Join()函数用法分析
本文实例讲述了C#多线程之Thread中Thread.Join()函数用法.分享给大家供大家参考.具体分析如下: Thread.Join()在MSDN中的解释:Blocks the calling thread until a thread terminates 当NewThread调用Join方法的时候,MainThread就被停止执行, 直到NewThread线程执行完毕. Thread oThread = new Thread(new ThreadStart(oAlpha.Beta));
-
关于numpy中np.nonzero()函数用法的详解
np.nonzero函数是numpy中用于得到数组array中非零元素的位置(数组索引)的函数.一般来说,通过help(np.nonzero)能够查看到该函数的解析与例程.但是,由于例程为英文缩写,阅读起来还是很费劲,因此,本文将其英文解释翻译成中文,便于理解. 解释 nonzero(a) 返回数组a中非零元素的索引值数组. (1)只有a中非零元素才会有索引值,那些零值元素没有索引值: (2)返回的索引值数组是一个2维tuple数组,该tuple数组中包含一维的array数组.其中,一维arra
-
C#中异步回调函数用法实例
本文实例讲述了C#中异步回调函数用法.分享给大家供大家参考.具体如下: static void Main(string[] args) { Func<string,string> showMessage = ShowMessage; //设置了回调函数Completed,不能有返回值 IAsyncResult result = showMessage.BeginInvoke("测试异步委托",new AsyncCallback(Completed),null); //半段异
-
vc中SendMessage自定义消息函数用法实例
本文实例讲述了vc中SendMessage自定义消息函数用法,分享给大家供大家参考.具体如下: SendMessage的基本结构如下: 复制代码 代码如下: SendMessage( HWND hWnd, //消息传递的目标窗口或线程的句柄. UINT Msg, //消息类别(这里可以是一些系统消息,也可以是自己定义,下文具体介绍,) WPARAM wParam, //参数1 (WPARAM 其实是与UINT是同种类型的, //在vc编译器中右键有个"转到WPARA
-
详解python中的index函数用法
1.函数的创建 def fun(): #定义 print('hellow') #函数的执行代码 retrun 1 #返回值 fun() #执行函数 2.函数的参数 普通参数 :要按照顺序输入参数 def fun(a,b,c): print(a) print(b) print(c) return a fun(11,22,33) #输出:11 #输出:22 #输出:33 指定参数:输入参数时可以不按照顺序输入 def fun(a,b,c): print(a) print(b) print(c) re
-
基于numpy中的expand_dims函数用法
常见的一种应用场景: 条件:假设A的shape为[4, 2],B的shape为[5, 2] 目的:实现A中的每一行, 减去B中的所有行(broadcast操作). 实现: A1 = np.expand_dims(A, -2) => A1的shape变为[4, 1, 2] B1 = np.expand_dims(B, 0) => B1的shape变为[1, 5, 2] A1 - B1 其他示例: wh = np.random.randint(1,3, size=(4,2)) np.expand_
-
python 的numpy库中的mean()函数用法介绍
1. mean() 函数定义: numpy.mean(a, axis=None, dtype=None, out=None, keepdims=<class numpy._globals._NoValue at 0x40b6a26c>)[source] Compute the arithmetic mean along the specified axis. Returns the average of the array elements. The average is taken over
随机推荐
- 详解C语言中return与exit的区别
- 用Webpack构建Vue项目的实践
- 关于Vue实现组件信息的缓存问题
- JS数组返回去重后数据的方法解析
- JavaScript模拟实现键盘打字效果
- php面向对象全攻略 (十五) 多态的应用
- 轻松学习C#的运算符
- jQuery bt气泡实现悬停显示及移开隐藏功能的方法
- jQuery增加自定义函数的方法
- 浅析Java异常处理中断言的使用
- python执行使用shell命令方法分享
- SpringBoot之Banner的使用示例
- IE11下CKEditor在Bootstrap Modal中下拉问题的解决
- Android实现垂直跑马灯效果
- python实现周期方波信号频谱图
- Spring-boot的debug调试代码实例
- Django分组聚合查询实例分享
- java反射机制给实体类相同字段自动赋值实例
- 详解springBoot启动时找不到或无法加载主类解决办法
- Spring session实现共享单点登录案例过程解析