Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

34520 / 76738

←次へ　｜　前へ→


	【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

≪