Yazı Font Küçült Yazı Font Büyült

Çalışma Anında Label Oluşturmak

Aşağıdaki şekillerde gösterildiği gibi çalışma anında label oluşturacağız.

Resim1

Şekil 1

Resim2

Şekil 2

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim labels As New Label
        labels.Name = "labeller"
        labels.Text = "Çalışma Anında Label Oluşturmak- Örnek"
        labels.Size = New System.Drawing.Size(500, 100)
        labels.Font = New System.Drawing.Font("Tahoma", 10, FontStyle.Bold)
        labels.Location = New Point(1, 40)
        labels.Visible = True
        Me.Controls.Add(labels)

    End Sub
End Class

Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN