現在、VBA にタイマーをインストールしようとしています。クイズに取り組んでいます。
答えるべき質問がいくつかあります。私が知りたいのは、誰かが各質問に答えるのに費やす時間です。したがって、タイマーは誰かが質問をクリックするたびに開始し、誰かが質問 2 をクリックすると停止し、すぐに再開する必要があります。
OnClick イベント。DateDiff を使用して、費やされた時間を計算するだけです。もちろん、ボタンをクリックして試験を開始するか、試験を含むフォームを開く必要があるため、最初の参照ポイントがあります。ただし、そのタイムスタンプをテーブルに書き込み、ボタンがクリックされるたびに差を計算するのに数ミリ秒しかかからないはずです。
タイマー機能が使えます。これにより、最大 1/1000 秒の精度が得られます。
Dim myTime as variant
myTime = Timer
...
Debug.Print "Process duration", Timer - myTime