主题：[求助]任务栏隐藏了，但是留下空白，表不缩进，求教

If e.sender.Text = "<<"

    e.Form.panel.parent.parent.Width = e.Form.Controls("Button1").Width + 5

    e.sender.text = ">>"

    e.sender.left = 0

    e.Form.Controls("TopicBar1").Visible = False

Else

    e.Form.panel.parent.parent.Width = 170 + e.Form.Controls("Button1").Width

    e.sender.text = "<<"

    e.sender.left = 0

    e.Form.Controls("TopicBar1").Visible = True

End If