這期內(nèi)容當(dāng)中小編將會給大家?guī)碛嘘P(guān)如何在VBA中使用Timer函數(shù)，文章內(nèi)容豐富且以專業(yè)的角度為大家分析和敘述，閱讀完這篇文章希望大家可以有所收獲。

撫松ssl適用于網(wǎng)站、小程序/APP、API接口等需要進(jìn)行數(shù)據(jù)傳輸應(yīng)用場景，ssl證書未來市場廣闊！成為成都創(chuàng)新互聯(lián)公司的ssl證書銷售渠道，可以享受市場價格4-6折優(yōu)惠！如果有意向歡迎電話聯(lián)系或者加微信：13518219792（備注：SSL證書合作）期待與您的合作！

一、題目：

要求編寫一段代碼，運用 Timer 函數(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)的時間賦給變量t。
4、For i = 1 To 1000000 ：從1 到 1000000循環(huán)。
5、a = a + i ：把a+i的值賦給變量a，實際上是一個累加的過程。
6、MsgBox Timer - t & "秒" ：利用消息框顯示現(xiàn)在的時間減去前面設(shè)置的時間，得到運行整個代碼所化的時間。

Timer 函數(shù)

返回一個 Single，代表從午夜開始到現(xiàn)在經(jīng)過的秒數(shù)。

Timer
說明
Microsoft Windows中，Timer函數(shù)返回一秒的小數(shù)部分。

上述就是小編為大家分享的如何在VBA中使用Timer函數(shù)了，如果剛好有類似的疑惑，不妨參照上述分析進(jìn)行理解。如果想知道更多相關(guān)知識，歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道。

網(wǎng)頁標(biāo)題：如何在VBA中使用Timer函數(shù)-創(chuàng)新互聯(lián)
文章位置：http://weahome.cn/article/dohehe.html