[VB.NET] Collections

[Verwijderd]

Ik heb een Collection aangemaakt en daarin zitten verschillende soorten objecten.

Een voorbeeld zou dus kunnen zijn een Collection met strings,integers,files,etc.

Nu wil ik door de collectie heen lopen en alleen een bepaald type object weergeven.

Dit werkt niet:

Visual Basic .NET:

For Each myString as String in myCollection
Console.Out.WriteLine(myString)
Next

Ik krijg dan een Casting error. Hij kan dus als hij een integer tegenkomt er niet een string van maken. Ik wil alle objecten behalve strings, in de collectie dus overslaan.

[gorgi_19]

Hint:
http://www.experts-exchan...ual_Basic/Q_20541600.html

[Woy]

je moet denk je hele collection doorlopen en controleren op type dus zo in c#

C#:

foreach( object element in myCollection )
{
    if( element is string )
    {
        //doe wat
    }
}

[ Voor 3% gewijzigd door Woy op 24-06-2003 11:44 ]

[Verwijderd]

Thanks.. min of meer gelukt maar:

Ok hier wil dus die bepaalde objecten eruit halen. Ik krijg nu een Object reference not set to an instance of the object error. Maar ik snap niet waarom.

Visual Basic .NET:

For Each myProbe As Probe In mycircuit.getProbes
            Console.Out.WriteLine(myProbe.Name + " " + myProbe.Input.ToString)
        Next

Ik heb hiervoor een aparte property gemaakt. Het object zelf zorgt ervoor dat er in die property alleen die soorten objecten zitten.

Code van de property:

Visual Basic .NET:

Public ReadOnly Property getProbes() As Collection
        Get
            Dim j As Integer
            For j = 1 To _ProbesOnly.Count 'Clear collection first
                _ProbesOnly.Remove(1)
            Next
            Dim i As Integer
            For i = 1 To _Nodes.Count
                If TypeOf _Nodes(i) Is Probe Then
                    _ProbesOnly.Add(_Nodes(i))
                End If
            Next
        End Get
    End Property

[gorgi_19]

Visual Basic .NET:

For Each myProbe As Object In mycircuit.getProbes
    If TypeOf MyProbe Is Probe Then
        Dim _probe as Probe = CType(MyProbe,Probe)
        Console.Out.WriteLine(_probe.Name & " " & _probe.Input.ToString)
    End if
Next

[ Voor 10% gewijzigd door gorgi_19 op 24-06-2003 12:17 ]

[Verwijderd]

Oke maar waarom?

[gorgi_19]

Verwijderd schreef op 24 June 2003 @ 12:17:
Oke maar waarom?

Werkt die methodiek van mij niet?
Object not reference lijkt me een casting probleem...

Visual Basic .NET:

Dim objProbe as Probe = myprobe

en myprobe is van het type AlsoProbe, dan zal hij hier geen foutmelding geven, maar blijft objProbe Nothing.

[ Voor 43% gewijzigd door gorgi_19 op 24-06-2003 12:19 ]

[Verwijderd]

gorgi_19 schreef op 24 June 2003 @ 12:17:
[...]

Werkt die methodiek van mij niet?

Weet ik nog niet.... ik snap niet waarom dat zou moeten...

[gorgi_19]

Verwijderd schreef op 24 June 2003 @ 12:19:
[...]


Weet ik nog niet.... ik snap niet waarom dat zou moeten...

Uberhaupt zal hij niet werken, want een arraylist begint met z'n index vanaf 0 te tellen en niet vanaf 1.

[GigaDave56]

[quote]

code:

Public ReadOnly Property getProbes() As Collection
        Get
            Dim j As Integer
            For j = 1 To _ProbesOnly.Count 'Clear collection first
                _ProbesOnly.Remove(1) <- moet dit niet .Remove(j) zijn?
            Next
            Dim i As Integer
            For i = 1 To _Nodes.Count
                If TypeOf _Nodes(i) Is Probe Then
                    _ProbesOnly.Add(_Nodes(i))
                End If
            Next
        End Get
    End Property

Voor de rest geen idee, zag alleen een cruciaal foutje

[edit]
Eigen fout ingezien Bedankt DaftPunkNL. Mij gaat met een beginnersboekje in een hoek zitten...

[ Voor 10% gewijzigd door GigaDave56 op 24-06-2003 13:18 ]

[whoami]

Verwijderd schreef op 24 June 2003 @ 12:17:
Oke maar waarom?

Omdat je een null value uitleest.

[Verwijderd]

[quote]GigaDave56 schreef op 24 June 2003 @ 12:27:

code:

Public ReadOnly Property getProbes() As Collection
        Get
            Dim j As Integer
            For j = 1 To _ProbesOnly.Count 'Clear collection first
                _ProbesOnly.Remove(1) <- moet dit niet .Remove(j) zijn?
            Next
            Dim i As Integer
            For i = 1 To _Nodes.Count
                If TypeOf _Nodes(i) Is Probe Then
                    _ProbesOnly.Add(_Nodes(i))
                End If
            Next
        End Get
    End Property

Voor de rest geen idee, zag alleen een cruciaal foutje

Nee, omdat de collectie bij 1 begint en niet bij 0. En daarnaast als je een item verwijderd dan wordt de collectie opnieuw geindexeerd. Dus je kunt gewoon item 1 blijven weghalen.

[Verwijderd]

whoami schreef op 24 June 2003 @ 12:34:
[...]


Omdat je een null value uitleest.

Ja maar waarom is deze null? De probes objecten zijn gewoon gekopieerd

[Verwijderd]

Gevonden.... In de Get gedeelte van de property vergeten om return _ProbesOnly neer te zetten....... soms is het zo makkelijk dat... ach je kent het wel....