第1.40例 Timer 函數(shù)
一、題目:
要求編寫一段代碼,運(yùn)用 Timer 函數(shù)來計(jì)算本代碼運(yùn)行所化的時(shí)間。
二、代碼:
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ǒng)的時(shí)間賦給變量t。
4、For i = 1 To 1000000 :從1 到 1000000循環(huán)。
5、a = a + i :把a(bǔ)+i的值賦給變量a,實(shí)際上是一個(gè)累加的過程。
6、MsgBox Timer - t "秒" :利用消息框顯示現(xiàn)在的時(shí)間減去前面設(shè)置的時(shí)間,得到運(yùn)行整個(gè)代碼所化的時(shí)間。
Timer 函數(shù)
返回一個(gè) Single,代表從午夜開始到現(xiàn)在經(jīng)過的秒數(shù)。
Timer
說明
Microsoft Windows中,Timer函數(shù)返回一秒的小數(shù)部分。
您可能感興趣的文章:- VBA處理數(shù)據(jù)與Python Pandas處理數(shù)據(jù)案例比較分析
- 詳解bootstrap導(dǎo)航欄.nav與.navbar區(qū)別
- iOS中Navbar設(shè)置漸變色效果的方法示例
- iOS實(shí)現(xiàn)scrollview上拉顯示Navbar下拉隱藏功能詳解
- 微信小程序 navbar實(shí)例詳解
- Bootstrap CSS組件之導(dǎo)航條(navbar)
- Bootstrap Navbar Component實(shí)現(xiàn)響應(yīng)式導(dǎo)航
- VBA數(shù)組用法案例詳解