Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Con la propiedad Style del objeto Panel lo puedes hacer, en la MSDN tienes este ejemplo:
Private Sub Form_Load() ' Dim variables. Dim I as Integer Dim pnlX as Panel
For I = 1 to 5 ' Add 5 panels. Set pnlX = StatusBar1.Panels.Add( ) Next I
' Set the style of each panel. With StatusBar1.Panels .Item(1).Style = sbrDate ' Date .Item(2).Style = sbrTime ' Time .Item(3).Style = sbrCaps ' Caps lock .Item(4).Style = sbrNum ' Number lock .Item(5).Style = sbrIns ' Insert key .Item(6).Style = sbrScrl ' Scroll lock End With Form1.Width = 9140 ' Widen form to show all panels. End Sub
En http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cmctl198/html/vbproStylePanel.asp tienes la descripción de la propiedad.
Valora esta respuesta
0
Comentar
RE:STATUS BAR
Publicado por Diego (1 intervención) el 21/08/2003 06:09:41