Как получить управляющее свойство по «имени строки»?
я был создан кнопки и текстовые полякодирование в следующем цикле, результат
'T(x).Name = "text_1"
'T(x).Name = "text_2"
'T(x).Name = "text_3"
'....
'B(x).Name = "button_1"
'B(x).Name = "button_2"
'B(x).Name = "button_3"
'...
и я хочу получить свойство текстового поля, когда я нажимаю кнопку, я могу получить свойство кнопки, когда нажмите какbutton_1.Name.ToString
но я не могу получить свойство text_1,2,3 ....
я делаю трюк с помощью функции split_ button_1.Name.ToString, получаю последний номер и добавляю его к имени текстового поля, например:"text_" & button_1.Name.ToString
Но я могу'преобразовать эту строку в объект.
Обновить
Вот'это код, который яm, чтобы загрузить элементы управления в цикле:
C_A_TEXT(x) = New TextBox()
C_A_TEXT(x).Dock = System.Windows.Forms.DockStyle.Fill
C_A_TEXT(x).Location = New System.Drawing.Point(270, 5)
C_A_TEXT(x).Margin = New System.Windows.Forms.Padding(0)
C_A_TEXT(x).Size = New System.Drawing.Size(70, 27)
C_A_TEXT(x).TabIndex = 5
C_A_TEXT(x).Name = "NEW_RECHARGE_COUNT_TEXT_" & x
Обновление 2
Вот'Еще немного кода:
AddHandler C_A_BUTTONS(x).Click, AddressOf C_A_BUTTON
Private Sub C_A_BUTTON(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim thisButton As Button = sender Dim A = CType(Me.Controls("NEW_RECHARGE_COUNT_TEXT_1"), TextBox)
MsgBox(A.Text.ToString) 'Error!
End Sub