Массив командных кнопок
Как я могу создать массив кнопок в VB.NET?
cmdButton(0)
cmdButton(1)
cmdButoon(2)
1 ответ
Вы можете создать массив, как это
Dim btnCommand(2) As Button
Но вам нужно будет добавить его в форму и добавить обработчик кликов, чтобы сделать что-нибудь полезное:
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Dim y As Integer = 25
Dim btnCommand(2) As Button
For i As Integer = 0 To btnCommand.Length - 1
btnCommand(i) = New Button
Me.Controls.Add(btnCommand(i))
With btnCommand(i)
.Top = y
.Tag = i
.Text = "Button " + i.ToString
End With
y += 25
AddHandler btnCommand(i).Click, AddressOf ButtonArray_Click
Next
End Sub
Private Sub ButtonArray_Click(sender As System.Object, e As System.EventArgs)
Dim btn As Button = sender
MsgBox("Button " + btn.Tag.ToString + " was clicked")
End Sub