- 帖子
- 323
- 主題
- 6
- 精華
- 0
- 積分
- 313
- 點名
- 0
- 作業系統
- xp
- 軟體版本
- 2k
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2015-6-24
- 最後登錄
- 2026-1-5
|
本帖最後由 jackyq 於 2018-3-12 18:33 編輯
回復 jackyq
j大~~~~感謝，但測試ㄧ程式跑完結果為：0分4.1953125秒。秒數似乎還是沒辦法不要有小 ...
msmplay 發表於 2018-3-12 15:29 
dim m%,s%
t0=timer
s=int(timer-t0)
m=s\60
s=s-m*60
xxxxxxxxxxxxx(程式碼) '-------> Code 放這裡是錯誤的, 你一定永遠得到 0
msgbox "執行時間: " & m & " 分 " & s & " 秒"
我一開始是在懷疑你所謂的都是 0
是如上原因 --> 你把你的 code 放錯位置了
但是我想了想 , 你不可能那麼烏龍 , 會放錯位置
所以通通都是0的原因, 只剩唯1 可能 , 就是你的 code 雖然位置放對, 但是你的 code 耗時其實極短
短到連0.1 秒都不到 , 當然 最終整數秒結果還是 = 0
例如
t0=timer
For w= 1 to 1 ' ----> code 位置放對
Next
msgbox timer - t0 '---> 我保證 "整數秒" 永遠 = 0
所以我才幫你保留下秒數到 小數點
'================
但是現在你卻說顯示 4.1953125秒 這已表明你先前之所以都得到0 , 確實是因為把 code 放錯位置了 |
|
發表於 2018-3-12 14:00
| 