statusbar控件添加panel问题

Question

请教各位老师，开发环境vb6+windows2000。statusbar1控件，我想添加2个panel，添加方式如下，
form_load()
me.statusabr1.panels.add 1
me.statusbar1.panes.add 2
'设置宽度
me.statusbar1.panels(1).width=me.width/2
me.statusbar1.panels(2).width=me.width/2
'运行效果，添加了2个panel。可是statusbar1并没有光由2个panel占满，还空余一个部分；
‘如何实现statusbar1只由2个panel组成？
谢谢

Answer 1

'最前面加上这句，用来清除Panels.因为添加一个StatusBar到Form上时，缺省会有一个Panel，你在代码中又
'加了两个，当然就三个了。
Me.StatusBar1.Panels.Clear

Answer 2

默认有一个PANEL：Private Sub Form_Load()
Me.StatusBar1.Panels.Add 1
'Me.StatusBar1.Panels.Add 2
'设置宽度
Me.StatusBar1.Panels(1).Width = Me.Width / 2
Me.StatusBar1.Panels(2).Width = Me.Width / 2
MsgBox Me.StatusBar1.Panels.Count
End Sub

Answer 3

呵呵，改进一下：
    With StatusBar1
        .Panels.Clear
        .Panels.Add(, "First", "First Panel").AutoSize = sbrSpring
        .Panels.Add(, "Sencond", "Sencond Panel").AutoSize = sbrSpring
    End With