現在時刻表示について

解決

---

現在の時刻をフォームのラベルに表示させる方法を教えてください。
この時計は１秒毎の更新ができるようにしたいです。
表示方法は  15:44:30 (15時44分30秒)みたいな感じで

編集 削除

---

Private Sub Form_Load()
  Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
  Label1.Caption = Format(Time, "hh:nn:ss")
End Sub

とか

編集 削除

---

nowでも、いいッス

編集 削除

---

ありがとうございます！！

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。