中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

如何在VBA中使用Timer函數

發布時間:2021-04-01 17:01:53 來源:億速云 閱讀:422 作者:Leah 欄目:開發技術

這期內容當中小編將會給大家帶來有關如何在VBA中使用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函數了,如果剛好有類似的疑惑,不妨參照上述分析進行理解。如果想知道更多相關知識,歡迎關注億速云行業資訊頻道。

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

双辽市| 庆安县| 邹城市| 卢氏县| 永靖县| 察隅县| 汨罗市| 武鸣县| 镇江市| 开鲁县| 施秉县| 富顺县| 霍州市| 日土县| 大城县| 巫溪县| 永和县| 都昌县| 昭通市| 柘荣县| 金堂县| 黔西县| 洛南县| 兴安盟| 昆山市| 武宁县| 松江区| 宁都县| 梅河口市| 德庆县| 全州县| 衡阳县| 岳池县| 临沭县| 舒兰市| 三原县| 曲阜市| 晋中市| 肇庆市| 任丘市| 湘潭市|