Örneğin veritabanında 10 tane veri var. Bunları okuyorum. Daha sonra kod ile 10 tane buton oluşturup form üzerindeki panel nesnesinin üzerinde bunları alt alta konumlandırmak istiyordum. Birkaç saattir araştırıyordum sonunda çözümü kendimde buldum

butonları tanımlama satırında indisli tanımlama bir türlü yapmıyordu, sonunda şans eseri tanımlamayı hatasız geçecek şekilde yazmayı başarıdım

        Dim butonSayisi As Integer = 10
        'Dim btn1(butonSayisi) As New Button() şeklinde yazmayı denedim olmadı
        'Dim btn1(butonSayisi) As Button() şeklinde yazmayı denedim olmadı
        Dim btn1(butonSayisi) As Button ' bu şekilde tanımlamak gerekliymiş
        Dim pt As System.Drawing.Point
        Dim sz As System.Drawing.Size
        Dim i As Integer

        For i = 0 To butonSayisi - 1
            btn1(i) = New Button
            btn1(i).Name = "btn" & i + 1
            btn1(i).Text = "test" & i + 1
            btn1(i).Visible = True

            pt.X = 0
            If i = 0 Then
                pt.Y = 0
            Else
                pt.Y = btn1(i - 1).Location.Y + 29
            End If

            sz.Height = 30
            sz.Width = 200
            btn1(i).Location = pt
            btn1(i).Size = sz
            Panel1.Controls.Add(btn1(i))
        Next