"Live" ur på Form??

Indsæt en alm etiket på formen og kald den : lblKl
formens timerinterval sættes til 1000
endelig indsættes flg kode i formens vedTimerudløb:
Private Sub Form_Timer()
  lblKl.Caption = Time
End Sub

Niels

istedet for at vise 'uret' i en etiket kan du vise det i formens titellinje:
Private Sub Form_Timer()
  me.Caption = Time
End Sub

Hvordan går det ??

Det med uret i titel linien virker fint...
Det andet med etiketten kan jeg ikke lige få til at funke.. :-(
Hvis jeg skriver :
Private Sub Form_Timer()
  lblKl.Caption = Time
End Sub

i formens egenskaber ved timerudløb siger den at den mangler en macro...

Din etiket SKAL hedde 'lblKl' (i etikettens egenskabsark)

Mangler makro ????  -  måske ligger fejlen i formens vedTimerudløb hændelse, der skal stå '[Hændelsesprocedure]' - og ved at klikke på ... (de tre prikker til højre) skal VBA editoren åbne i den Hændelse vi arbejder med 'Private Sub Form_Timer()'

Niels

Virker stadig ikke...

Se lige her :
http://users.cybercity.dk/~bkb8914/blacksound/testdb/1.jpg
og her
http://users.cybercity.dk/~bkb8914/blacksound/testdb/2.jpg

Men nu mangler den da i det mindste ikke en Macro.. :-)

Ok, nu bliver det underligt..
Hvis jeg laver en tekst box med tilhørende label og jeg så kalder denne label for lblKl så funker det...
Men kopiere denne label og indsætter den for sig selv eller laver en ny virker det ikke......

Hvorfor mon???

Jeg kan godt bruge det på den måde med tekstboxen og tilhørende label så der er point til dig..
Men har du en ide om hvorfor det skal gøres så kringlet???

Det ved jeg ikke hvorfor - nogen gange hjælper det at slette etiketten og lave en ny.

Niels

PS - Di kan også bruge en textbox:

me.txtBox = time

Niels

Jeg er ikke lige så meget inde i de koder..
Men vil gerne lære...
me.txtBox står for hvad???

Skal det stå i stedet for
Private Sub Form_Timer()
  lblKl.Caption = Time
End Sub

så der står
Private Sub Form_Timer()
  me.txtBox = time
End Sub


???

Og hvordan skal textboxen så sættes op??

Jeg vil gerne forstå sammenhængen til en anden gang..

hændelsesstyret programering:
Vi opretter en hændelse vha formens timer, der sættes til 1000 ms.
Herefter vil alt vi skriver i mellem
Private Sub Form_Timer()
  Og
End Sub
blive udført hvert sek.
'me' henviser til formen - 'txtBox' er navnet på en tekstboks og 'time' er en function der returnere pc'ens klokkeslet.
egenskaben caption er formens/etikketen overskrift. Hvis du stiller dig i etikketens egenskabsark - titteltekst og trykker F1, viser hjælpen dig VBA navnet Caption.

tekstboxen skal ikke sættes op med andet end navnet skal passe med det du skriver i koden.

Niels