VB_2014_SLIP 28




SLIP 28_1
Option Explicit
Private Sub Form_Load()
Dim panel1 As Panel
Dim Panel2 As Panel
Set panel1 = StatusBar1.Panels.Add(1)
Set Panel2 = StatusBar1.Panels.Add
panel1.Text = "NR CLASSES"
panel1.Alignment = sbrCenter
panel1.AutoSize = sbrContents
Panel2.Style = sbrDate
End Sub



No comments:

Post a Comment

Note: only a member of this blog may post a comment.