zwei Array-Listen zusammen führen

18/02/2009 - 22:11 von Maximilian Tescher | Report spam
Hallo miteinander,

ich sehe wohl den Wald nicht vor lauter Bàumen, aber ich komme nicht
auf die Lösung, daher würde ich gerne von Euch etwas Hilfe erbitten.

Ich habe eine Klasse in der ich eine Liste fülle:

Public Class Test
...
Public Structure Felder
dim Feld1 as String
dim Feld2 as String
End Structure

Dim Liste as new List(of Felder)
...
hier wird die Liste mit Werte gefüllt
...
Public Readonly Property Rueckgabe() as List (of Felder)
Get
Return Liste
End Get
end Property
End Class


Aus einem Form rufe ich die Klasse Test zwei mal auf:
Dim TestListe1 as New Test()
Dim TestListe2 as New Test()

Und nun möchte ich aus beiden Listen eine einzige machen, aber
irgendwie bekomme ich das absolut nicht in den Griff.

Versuche ich eine neue Liste mit "Dim Gesamt as new Test.Felder" zu
erstellen um dann mit .addrange zu arbeiten, kennt diese neue Liste
die Funktion addrange nicht.

Das muss doch gehen ohne zwei mal per for each...next zu arbeiten.

Oder sehe ich da was falsch?


Gruss,
Maxi
 

Lesen sie die antworten

#1 Martin H.
18/02/2009 - 22:38 | Warnen spam
Hallo Maximilian,

die Lösung sieht so aus:

'Anfang
Private Sub TestMe()
Dim Liste1 As New Test
Dim Liste2 As New Test
Dim t As Test.Felder

t.Feld1 = "1a"
t.Feld2 = "1b"
Liste1.Rueckgabe.Add(t)

t.Feld1 = "2a"
t.Feld2 = "2b"
Liste2.Rueckgabe.Add(t)

Liste1.Rueckgabe.AddRange(Liste2.Rueckgabe)
End Sub
' ENDE

Beste Grüße,

Martin

On 18.02.2009 22:11, Maximilian Tescher wrote:
Hallo miteinander,

ich sehe wohl den Wald nicht vor lauter Bàumen, aber ich komme nicht
auf die Lösung, daher würde ich gerne von Euch etwas Hilfe erbitten.

Ich habe eine Klasse in der ich eine Liste fülle:

Public Class Test
...
Public Structure Felder
dim Feld1 as String
dim Feld2 as String
End Structure

Dim Liste as new List(of Felder)
...
hier wird die Liste mit Werte gefüllt
...
Public Readonly Property Rueckgabe() as List (of Felder)
Get
Return Liste
End Get
end Property
End Class


Aus einem Form rufe ich die Klasse Test zwei mal auf:
Dim TestListe1 as New Test()
Dim TestListe2 as New Test()

Und nun möchte ich aus beiden Listen eine einzige machen, aber
irgendwie bekomme ich das absolut nicht in den Griff.

Versuche ich eine neue Liste mit "Dim Gesamt as new Test.Felder" zu
erstellen um dann mit .addrange zu arbeiten, kennt diese neue Liste
die Funktion addrange nicht.

Das muss doch gehen ohne zwei mal per for each...next zu arbeiten.

Oder sehe ich da was falsch?


Gruss,
Maxi

Ähnliche fragen