VB 6.0 Dato og ur der går i samme textbox eller label

Private Sub Form_Load()
  Me.Caption = Now
End Sub

Du skal bruge en Timer
Private Sub Form_Load
  Timer1.Interval = 1000
  Timer1.Enabled = True
  frm.caption = Now
End Sub

Har prøvet begge dele med negativt resultat. Jeg har sikkert fået svar som jeg har råbt, men jeg vil gerne have såvel dato som tid i text1.text? Og for dosmere, please!:o)

DATO SOM TID?? 14:04:03 (14-04-03)

Det er nok over min sengetid. Undskyld!
Label1.Caption = Format(Date, "dd-mm-yyyy")
Hvad skriver jeg hvis jeg vil have et ur i forlængelse af dette?

Label1.Caption = Format(Time, "h:m:s")

Label1.Caption = Format(Time, "hh:mm:ss")

Ja, så står der 00.20.09. Men uret går ikke?

Det er fordi du ikke bruger Timer-funktionen
/Søren

Jo, det gør det. Men det skifter selvfølgelig ikke hele tiden... jeg kan ikke umiddelbart se at det går.
Kan man få dette frem, fx sekunder
og kan jeg få det i forlængelse af datoen.
Jeg forhøjer selvfølgelig points'ne for disse nye spørgsmål.

JA

Private Sub Form_Load()
  Timer1.Interval = 1000
  Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
  Label1.Caption = Format(Time, "hh:mm:ss")
End Sub

Er det ikke "kun" tiden jeg får nu - og ikke tiden i forlængelse af datoen?

Jeg har en Timer, der hedder Timer1
Jeg skriver så

Private Sub Timer1_Timer()
  Label1.Caption = Now
End Sub

Når så intervallet er sat til 1000, ja så går mit ur med sekunder og det hele

fik du det til at virke??

Jeg kan ikke se andet end at I begge svarer rigtigt. Håber i kan leve med min fordeling af points. Mange tak for hjælpen. G'nat!:o))

ja tak for point :-)

Jamen bare du får løst dit problem, så er alt jo OK.
Sov godt, og tak for point
/Søren

Ja, tak det virker fint.