Split Panels : Split Container « GUI « VB.Net

1. VB.Net
2. GUI
3. Split Container

Split Panels

  


Imports System.Windows.Forms
Imports System.Drawing

Public Class Form1
    Inherits System.Windows.Forms.Form
    Public Sub New()
        MyBase.New()
        InitializeComponent()
    End Sub
    Friend WithEvents TreeView1 As System.Windows.Forms.TreeView
    Friend WithEvents ListView1 As System.Windows.Forms.ListView
    Friend WithEvents Splitter1 As System.Windows.Forms.Splitter
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
        Me.TreeView1 = New System.Windows.Forms.TreeView()
        Me.ListView1 = New System.Windows.Forms.ListView()
        Me.Splitter1 = New System.Windows.Forms.Splitter()
        Me.SuspendLayout()
        '
        Me.TreeView1.Dock = System.Windows.Forms.DockStyle.Left
        Me.TreeView1.Size = New System.Drawing.Size(120, 261)
        '
        Me.ListView1.Dock = System.Windows.Forms.DockStyle.Fill
        Me.ListView1.Location = New System.Drawing.Point(120, 0)
        Me.ListView1.Size = New System.Drawing.Size(232, 261)
        '
        Me.Splitter1.Location = New System.Drawing.Point(120, 0)
        Me.Splitter1.Size = New System.Drawing.Size(3, 261)
        '
        Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
        Me.ClientSize = New System.Drawing.Size(352, 261)
        Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.Splitter1, Me.ListView1, Me.TreeView1})
        Me.Text = "Creating Split Panels, Explorer-Style"
        Me.ResumeLayout(False)

    End Sub
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TreeView1.Nodes.Add("Example entry")
        ListView1.Items.Add("Sample data")
    End Sub
End Class

   
    
  

Related examples in the same category

1.

Use Split Container