Private Sub StatusBar1_Click()
StatusBar1.Panels.Add = Time
End Sub
Juu, mutta mieluiten niin ettei tarvi klikkiä paneelia ja että jopa päivittäs sitä vaikka sopivasti sekunnin välein.. :) Onload ei auttanut.. :(
Laita Timeriin, ja Timerin interval = 1000
Muuten toimii, mutta lisää joka sekka yhden paneelin, miten määritän sen päivittämään sitä samaa?
Lisää Form_Loadilla ja refressaa Timerillä
Siis Timer1 Interval = 1000 ja laita panelin tunnus tohon ykkösen tilalle. Toimi kun äkkiä testasin!
Private Sub Timer1_Timer() StatusBar1.Panels(1).Text = Time End Sub
Niinhän se tietenkin on! Kiitoksia! :D
Aihe on jo aika vanha, joten et voi enää vastata siihen.