Как установить выравнивание текста динамически добавляемой метки

Question

Как установить выравнивание текста динамически добавляемой метки, когда я получаю имя метки в строковой переменной, одна метка динамически добавляется в панель

  Dim instance As New Label
  Dim stringVariable As String

на событие загрузки формы::

    instance.Location = New Point(15, 15)
    instance.Size = New Size(60, 30)
    instance.BorderStyle = BorderStyle.FixedSingle
    instance.AutoSize = False
    instance.Text = "LABEL1"
    Me.Panel1.Controls.Add(instance)

я получаю имя по:

    for each c as control in Panel1.Controls
    stringVariable=c.name
    next

но это невозможно

   Me.Panel1.Controls(stringVariable).textalign ??????
   it does not show text align property

пожалуйста помоги

Answer 1

DirectCast(Me.Panel1.Controls("Label1"), Label).TextAlign = ContentAlignment.TopRight

Answer 2

Я обнаружил, что эти значения будут устанавливать TextAlign

Public pTop_Center As Long = 2
Public pMiddle_Center As Long = 32
Public pBotton_Center = 512

 btn.TextAlign = pBotton_Center