Vb Code Verkürzung durch Next Schleife

[Algaten™]

Hi,

Ich habe in einer Form 100 Buttons
Und die möchte ich alle mitcode auf einmal die Farbe ändern Lassen
nun dachte ich mir ich mache das mit einer Next schleife Gut und schön

Dim buttonzahl As String
Dim i As Integer

For i = 1 To 100 Step 1
buttonzahl = i
form2.button(+buttonzahl = Color.Gainsboro)
MsgBox(i)
Next i

Gut nur das sieht komisch aus und funzt nicht und macht nur Fehler
wisst ihr wie das geht will das nicht andauernd ändern

[MoepMeep]

Schonmal was von arrays gehört? Auch wenn ich irgendwie bezweifel, dass der VB designer das unterstützt :>

[Algaten™]

Originally Posted by MoepMeep

Schonmal was von arrays gehört? Auch wenn ich irgendwie bezweifel, dass der VB designer das unterstützt :>

Danke das mal Jemand antwortet

Nun habe ich ein Neues Problem der Code is auch Richtig nur wenns ichs debugge kratz das Programm ab:

  Me.Hide()
        Dim inhalt As String
        inhalt = TextBox1.Text
        TextBox1.Clear()


        Dim nummer As Integer
        For nummer = 0 To 100

            If MapPosition_Anzeigen.Controls("Button" & nummer.ToString).Text = inhalt Then
                MapPosition_Anzeigen.Controls("Button" & nummer.ToString).BackColor = Color.Red
            End If


        Next


        MapPosition_Anzeigen.Show()

so wenn ich z.b. 54 eingebe überprüft der Code ob einer der Button den Text 54 überprüft wenn ja dann nimmt das Programm die zahl des buttons und ndert dann die Button farbe in rot aber das will nicht so ganz da sich der Debugger dann aufhängt

EDIT:

Fehler gefunden zum Glück ne Exe erstelt
Der fehler lag da
For nummer = 0 To 100
da gehörte For nummer = 1 To 100
hin