<output id="os3gq"><ruby id="os3gq"></ruby></output>

    1. <mark id="os3gq"></mark>
    2. Access微課連載
      網站公告
      ·Access快速平臺QQ群號:84825014    ·Access快速開發平臺下載地址及教程    ·歡迎添加微信交流賬號:AccessoftChu    ·如何快速搜索本站文章|示例|資料    
      您的位置: 首頁 > 技術文章 > Access數據庫-模塊/函數/VBA

      Timer 函數

      時 間:2020-04-15 08:51:50
      作 者:宏鵬   ID:21115  城市:上海
      摘 要:Timer 函數返回表示自午夜以來已過的秒數的 Single 
      正 文:

      Timer 函數

      返回表示自午夜以來已過的秒數的 Single 。


      語法:

      Timer


      備注:

      在 Windows 中, Timer函數返回秒的小數部分。In Windows, the Timer function returns fractional portions of a second. 在 Macintosh 中,定時器分辨率為 1 秒。

      示例:

      此示例使用 Timer 函數來暫停應用程序。This example uses the Timer function to pause the application. 該示例還使用**DoEvents** 在暫停過程中向其他進程生成。

      Dim PauseTime, Start, Finish, TotalTime
      If (MsgBox("Press Yes to pause for 5 seconds", 4)) = vbYes Then
          PauseTime = 5    ' Set duration.
          Start = Timer    ' Set start time.
          Do While Timer < Start + PauseTime
              DoEvents    ' Yield to other processes.
          Loop
          Finish = Timer    ' Set end time.
          TotalTime = Finish - Start    ' Calculate total time.
          MsgBox "Paused for " & TotalTime & " seconds"
      Else
          End
      End If






      Access軟件網QQ交流群 (群號:143677707)       access源碼網店

      最新評論 查看更多評論(0)

      發表評論您的評論將提升作者分享的動力!快來評論一下吧!

      用戶名:
      密 碼:
      內 容:
       

      常見問答

      技術分類

      相關資源

      最新帖子

      關于我們 | 服務條款 | 在線投稿 | 友情鏈接 | 網站統計 | 網站幫助