Массив командных кнопок

Как я могу создать массив кнопок в 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 
Другие вопросы по тегам