如何 測試 Excel VBA 計算時間間隔的 精確度？
- 帖子
- 1018
- 主題
- 15
- 精華
- 0
- 積分
- 1058
- 點名
- 0
- 作業系統
- win7 32bit
- 軟體版本
- Office 2016 64-bit
- 閱讀權限
- 50
- 性別
- 男
- 來自
- 桃園
- 註冊時間
- 2012-5-9
- 最後登錄
- 2022-9-28
|
回復 2# sjgau
我覺得這樣有問題，Timer傳回的數為Single，
在我的電腦上，Timer傳回的數只會到小數點後第二位，
這個數是已經進位過的，而不該再用 timer1( ) 做四捨五入，
你可能會說，Timer傳回的數如果只到小數點後第二位，timer1( )裡的 a 小數點後就應該都是零，可是不是這樣。
這是因為你的 a 是 Double 資料型態，資料型態之間轉換造成的誤差，可 run 底下程式碼知道有此誤差：- Sub Test()
- Dim t1 As Single
- Dim d1 As Double
-
- t1 = Timer
- Debug.Print "t1=", t1
- Debug.Print "Cdbl(t1)=", CDbl(t1)
- d1 = t1
- Debug.Print "d1=", d1
- End Sub
|
|
|
|
|
|
|
|
發表於 2013-10-24 17:09
| 