statusbar ved mouseover

<a href="blabla.html" target="blabla" onMouseOver="window.status='Startsiden'; return true" onMouseOut="window.status=''"><img src="blabla.gif" alt="" width="1" height="1" border="0"></a>

sagde jeg html??? tror jeg vist ikke... det er Visual Basic!!!

uuups - sorry!

Project > Components > Vælg "Microsoft Common Controls 6.0(SP6)"

Jeg ved ikke om dette er den letteste måde at gøre det på :o)

Opret StatusBar, Command(knap) og en timer...


Kode:


Private Sub Form_Load() 'Når formen loader
StatusBar1.Style = sbrSimple 'Sætter StatusBar1's style til simpel
Timer1.Enabled = False 'Deaktiverer Timer1
Timer1.Interval = 500 'Sætter intervallet til ½ sek
End Sub


Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) 'Rollover på knapppen
StatusBar1.SimpleText = "Eksempel" 'Status når der bliver rollover
Timer1.Enabled = True 'Aktiverer timer1
End Sub


Private Sub Timer1_Timer() 'Når Timer1 har "talt"
StatusBar1.SimpleText = "" 'Sætter StatusBar1's status til ingenting
Timer1.Enabled = False 'Deaktiverer Timer1
End Sub


/Rasmus

Intervallet kan sættes til mere eller mindre.... Hvis du vil have teksten til at stå der i 5 sek. er det 5000, hvis det er 2 sek 2000 o.s.v Altså du ganger bare det antal sekunder du gerne vil have med 1000...

Oops - Det skulle være et svar :)

:(