Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


34516 / 76734 ←次へ | 前へ→

【47427】時間の計算について
質問  たいやきの頭  - 07/3/9(金) 17:00 -

引用なし
パスワード
   処理がどのぐらい後に終わるかを表示しようと思って、
For i = 1 To 10
  taimu(1) = Hour(Time)
  taimu(2) = Minute(Time)
  taimu(3) = Second(Time)
  ActiveWindow.Caption = i
  DoEvents
  For a = 1 To 99999
    DoEvents
  Next a
  g = 10 - i
  Debug.Print "後 " & DateDiff("h", taimu(1) * g, Hour(Time)) & "時間" & DateDiff("n", taimu(2) * g, Minute(Time)) & "分" & DateDiff("s", taimu(3) * g, Second(Time)) & "秒後です"
Next i
というコードをくんだのですが、
めちゃくちゃな値が出てくるのですが、なぜなんでしょうか?
誰か詳しい方教えてください。
0 hits

【47427】時間の計算について たいやきの頭 07/3/9(金) 17:00 質問
【47429】Re:時間の計算について ウッシ 07/3/9(金) 17:08 回答
【47430】Re:時間の計算について Kein 07/3/9(金) 17:09 発言
【47431】Re:時間の計算について たいやきの頭 07/3/9(金) 17:12 質問
【47432】Re:時間の計算について neptune 07/3/9(金) 17:32 回答
【47434】Re:時間の計算について Kein 07/3/9(金) 17:38 発言
【47435】Re:時間の計算について ウッシ 07/3/9(金) 17:50 発言
【47468】Re:時間の計算について たいやきの頭 07/3/11(日) 19:31 発言
【47469】Re:時間の計算について りん 07/3/11(日) 20:23 回答
【47480】Re:時間の計算について たいやきの頭 07/3/12(月) 9:21 お礼
【47488】Re:時間の計算について りん 07/3/12(月) 12:10 発言

34516 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free