vb.net入门——Splitter 控件的使用

来源：qqread 作者：douces 出处：巧巧读书 2007-12-07 进入讨论组

• 关 键 词：
• windows
• vb.net
• html
• qq游戏

上一页 1 2 3 4 5 6 

Private Shared Sub splitter_resize(ByVal sender As Object, ByVal e As System.EventArgs)

Dim sl As Splitter = CType(sender, Splitter)

Dim lbl As Label = CType(sl.Controls(0), Label)

lbl.Location = New Point(CInt(-4), CInt(sl.Height / 2 - lbl.Height))

End Sub

End Class

使用时，在窗体的初始化代码中加入如下所示的红色代码即可：
    Public Sub New()
        MyBase.New()

        '该调用是 Windows 窗体设计器所必需的。
        InitializeComponent()

        '在 InitializeComponent() 调用之后添加任何初始化
　     mySplitter.AddShowHideEvent(Me.Splitter1)
    End Sub

现在运行程序，如下图七所示，我们的 Splitter1 控件也有了个小三角，也可以单击隐藏它左边的控件了。

图七：带有小三角的Splitter控件

根据以上代码，我们还可以对代码进行修改，实现隐藏水平Splitter控件的右边或者上下的控件。

专题:http://www.qqread.com/book/myvbnet/my0025.html 更多内容请看Solaris基础知识入门、.NET移动与嵌入式技术、.NET开发手册专题，或进入讨论组讨论。

上一页 1 2 3 4 5 6 

【收藏此文】【大 中 小】【打印】【关闭】

较早的文章：vb.net入门——ComboBox 控件的使用

较新的文章：vb.net入门——DateTimePicker 控件的使用