Command button array

How can I create a array of buttons in VB.NET?



You can create an array like this

Dim btnCommand(2) As Button

But you will have to add it to your form and add a click handler in order for this to do a anything useful:

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
        With btnCommand(i)
            .Top = y
            .Tag = i
            .Text = "Button " + i.ToString
        End With
        y += 25
        AddHandler btnCommand(i).Click, AddressOf ButtonArray_Click
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 

Need Your Help

Rock Paper Scissors help needed

python python-2.7 tkinter

Can anyone please help me with this code? Its not working.

Stripe s2Member Pro Plugin returning card_declined in live mode

php wordpress ssl stripe-payments

I am using the s2Member Pro plugin with a Wordpress installation to accept subscription payments.