現在時刻表示について

解決

たろう 2003-10-24 15:47:26 No: 109413

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

1412 2003-10-24 16:04:06 No: 109414

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

とか

にゃは 2003-10-24 16:23:06 No: 109415

nowでも、いいッス

たろう 2003-10-24 19:12:15 No: 109416

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