Hallo.

Vorerst möchte ich sagen, dass ich noch ein ziemlicher Anfänger bin, also wenn ihr nicht genau versteht was ich versuche zu erklären, fragt einfach nochmal nach

Ich möchte mit VB 2008 Schiffe versenken programmieren.(unten ist ein Bild vom "Grundriss")
Ich habe jetzt noch nicht sehr viel gemacht, denn ich bin auf ein Problem gestoßen.

Ich habe als erstes ziemlich mühsam die einzelnen Felder(Panels)nach den jeweiligen Feld benannt (z.B. erstes Feld links oben heißt Panel1a, rechts daneben Panel1b, usw...) Das war schon ziemlich aufwendig.
Ich habe daraufhin eine Testprozedur gemacht ob auch alles passt:

Diese soll alle Panels weiß färben. Klappt auch soweit.
Wegen der übersichtlichkeit habe ich den Rest hier weggelassen. Hier bin ich eigentliches Problem gestoßen:
Wie kann man diese Wiederholungen vermeiden, also immer
Panel1b.BackColor = Color.White
Panel1c.BackColor = Color.White
Panel1d.BackColor = Color.White
zuschreiben geht zwar mit Copy&Paste aber es geht doch auch bestimmt anders.
z.b. panel1a,1b,3b,... .Backcolor = Color.White - oder so ähnlich, halt in möglichst wenig Zeilen.
Das ist erstmal nicht so wichtig.

Ich würde gern wissen wie man das bei Prozeduren macht.

Ich will es so programmieren, dass wenn man auf ein Feld(Panel) klickt, der Feldname in die Variable "feld" geschrieben wird, sodass man jederzeit aufrufen kann, auf welches Feld man geklickt hat. Wenn ich diesen Quellcode(wieder der Einfachkeit wegen gekürzt) so weiterschreiben wollte müsste ich da ja 300(!) Zeilen schreiben und das würde Stunden dauern.

Ich suche also nach einer Möglichkeit ohne diese Wiederholugen
Private Sub Panel1a_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel1a.Click
feld = "A1"
End Sub

Private Sub Panel1b_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Panel1b.Click
feld = "B1"
End Sub


Kann mir da jmd weiterhelfen?
Hoffe das das jmd verstanden hat, um was es geht

Danke schonmal.

Pack Dir die Spielfelder in ein 2-Dimensionales Array:

dann kannst Du über 2 Schleifen bequem drauf zugreifen.

Danke erstmal für die Antwort, hat mir schon ein bisschen geholfen.

Was muss ich in die geschweiften Klammern reinschreiben, dass ich z.B. das Panel1a mit spielfeld(0,0) ansprechen kann, das Panel2a mit spielfeld(1,0), Panel1b mit spielfeld(0,1) usw?
lg

shadow321 schrieb:

Was muss ich in die geschweiften Klammern reinschreiben

Du musst dann bei den Schleifen über alle 1. btw. 2. Indizes die Zeilen- und Spalten-Zuordnung ausprobieren.