Multiline Label : Label Multiline « GUI « VB.Net

Multiline Label

Multiline Label
Imports System
Imports System.Data
Imports System.Windows.Forms
Imports System.Drawing

Public Class MainClass
    Shared Sub Main()
        Dim form1 As Form = New Form1
    End Sub
End Class

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        lblInstructions.Text = "Line 1" & vbCrLf & _
                               "     Line 2" & vbCrLf & _
                               "           Line 3" & vbCrLf & _
                               "    Lin4"
    End Sub
End Class

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class Form1
    Inherits System.Windows.Forms.Form

    'Form overrides dispose to clean up the component list.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing AndAlso components IsNot Nothing Then
        End If
    End Sub

    'Required by the Windows Form Designer
    Private components As System.ComponentModel.IContainer

    'NOTE: The following procedure is required by the Windows Form Designer
    'It can be modified using the Windows Form Designer.  
    'Do not modify it using the code editor.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.lblInstructions = New System.Windows.Forms.Label
        Me.lblInstructions.AutoSize = True
        Me.lblInstructions.Location = New System.Drawing.Point(8, 8)
        Me.lblInstructions.Name = "lblInstructions"
        Me.lblInstructions.Size = New System.Drawing.Size(67, 13)
        Me.lblInstructions.TabIndex = 0
        Me.lblInstructions.Text = "lblInstructions"
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(286, 116)
        Me.Name = "Form1"
        Me.Text = "MultiLineLabel"

    End Sub
    Friend WithEvents lblInstructions As System.Windows.Forms.Label

End Class


Related examples in the same category