厨な質問なのですが。

VBで時間計測のプログラムを作っています。
DATE型変数では1秒以下の表示が出来ないので

自分なりに必死に表示させようとしているわけですが。

これが上手く動きません。
一分になるかならないかのとこで表示が変に・・・

なんかいい方法ないもんでしょうか。