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

前端之家收集整理的这篇文章主要介绍了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 教程 目录

原文链接:https://www.f2er.com/vb/256223.html

猜你在找的VB相关文章