---

Hej

Er der nogen der ved hvordan man laver blinkende text i VB.
Jeg har forsøgt på nedenstående måde, men det æder AL processorkraften....

Der må være en bedre måde...

hilsen Palle

1100 If blink = 2 Then
Label17.Visible = False
Label2.Visible = False
start = Timer Do While Timer < start + 0.6
DoEvents
Loop
Label17.Visible = True
Label2.Visible = True
start = Timer Do While Timer < start + 0.6
DoEvents
Loop
GoTo 1100

---

"PALLE JOHANSEN" <mail@NOSPAMcliffhanger.dk> skrev i en meddelelse
news:e_mZ6.108$S42.16749@news.get2net.dk...
> Hej
>
> Er der nogen der ved hvordan man laver blinkende text i VB.

Én måde kunne være:

Sub Timer1_Timer()
label1.Visible = Not label1.Visible
End Sub

Hvis du har flere labels, der skal blinke, og du skal være sikker på, at de
følges ad

Label1.Visible = Not Label1.Visible
Label2.Visible = Label1.Visible
Label3.Visible = Label1.Visible
....
osv

--
mvh
Jens Vestergaard
www.railsoft.dk