vb.net 教程 3-8 窗体编程 容器 3 SplitContainer

SplitContainer:拆分器。该容器分为两部分,在运行时可以拖动拆分栏(两部分之间的区域,我是这么称呼的)重新设置两部分的大小。

有点像拆分栏将资源管理器分为驱动器和文件夹两部分。

图上红圈里面的双箭头,额,图上那个我画的,截图截不出鼠标,能够看懂就可以了。

设计时,向窗体拖放一个SplitContainer,认会设置Dock为Fill

同时,分为的两部分名称为Panel1和Panel2。在这两个Panel上可以放置需要的控件。

还可以放置SplitContainer,将容器分为更多的部分:

主要属性

Panel1:SplitContainer 的左侧面板或上部面板
SplitContainer.Panel1MinSize:Panel1最小距离
Panel2:SplitContainer 的右侧面板或下部面板
SplitContainer.Panel2MinSize:Panel2最小距离
IssplitterFixed:指示拆分栏是固定的还是可移动的。true:固定的;否则为false。认值false。
Orientation:指示 SplitContainer 面板处于水平方向还是垂直方向,上图中显示一个左右拆分的,然后右面部分容器里面又是一个上下拆分。
SplitterWidth:拆分器的宽度,认为4像素
SplitterIncrement:拆分器移动的增量
Splitterdistance:拆分器离 SplitContainer 的左边缘或上边缘的位置

主要事件:

SplitterMoved:当拖动拆分栏时触发此事件。


在上图的窗体设计中增加2个按钮和一个标签,分别放在不同的panel中,如下图:

button1按下时:

    Private Sub Button1_Click(sender As Object,e As EventArgs) Handles Button1.Click
        MessageBox.Show(Button1.Parent.Parent.Name)
    End Sub

button2按下时:

    Private Sub Button2_Click(sender As Object,e As EventArgs) Handles Button2.Click
        MessageBox.Show(Button2.Parent.Parent.Name)
        MessageBox.Show(Button2.Parent.Parent.Parent.Parent.Name)
    End Sub

拖动滚动栏时:

    Private Sub SplitContainer1_SplitterMoved(sender As Object,e As SplitterEventArgs) Handles SplitContainer1.SplitterMoved
        Label1.Text = SplitContainer1.Panel1.Width.ToString
    End Sub


大家可以测试一下以上代码

需要注意的是:按钮1的父控件是SplitContainer1.Panel1,但是,这似乎不是名程,因为使用 Button1.Parent.Name 将返回空字符串。

Button2.Parent.Parent.Name 返回SplitContainer1

Button2.Parent.Parent.Parent.Parent.Name 返回SplitContainer2


由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。

学习更多vb.net知识,请参看vb.net 教程 目录

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As Dat...