Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VB.Net - Frage zu SortedList

Frage Entwicklung Visual Studio

Mitglied: emeriks

emeriks (Level 4) - Jetzt verbinden

26.02.2014 um 15:19 Uhr, 1420 Aufrufe, 2 Kommentare, 1 Danke

Hi,
habe mal ne Frage zum Verständnis von "for each" im Zusammenhang mit "SortedList" in VB.Net.

Wenn ich die Elemente einer Liste durchlaufe und dabei ein Element lösche, dann "springt der Zeiger". Das weiß ich und kann auch damit umgehen, jedoch weiß ich nicht, ob das nicht noch einfacher geht.

Beispiel: Habe eine Liste mit unbekannten Schlüsseln aber bekannten Werten.
01.
Dim x As New SortedList 
02.
x.Add("unbekannter Key A", "Buchstabe A") 
03.
x.Add("unbekannter Key B", "Buchstabe B") 
04.
x.Add("unbekannter Key C", "Buchstabe C") 
05.
x.Add("unbekannter Key D", "Buchstabe D")
Wenn ich die Elemente durchlaufe, nach einem Element "Buchstabe C" oder "Buchstabe D" suche und diese dann lösche, dann fliegt mir der Code im Beispiel 1 nach dem Löschen von "Buchstabe C" beim "Next" raus.
01.
For Each y As DictionaryEntry In x 
02.
  If y.Value = "Buchstabe C" Or y.Value = "Buchstabe D" Then 
03.
    x.Remove(y) 
04.
  Else 
05.
    MsgBox(y) 
06.
  End If 
07.
Next
Alternativ über den Key. Hier kommt der Fehler auch beim "Next" wenn "Buchstabe C" gelöscht wurde.
01.
For Each k As String In x.Keys 
02.
  Dim y As String = x(k) 
03.
  If y = "Buchstabe C" Or y = "Buchstabe D" Then 
04.
    x.Remove(k) 
05.
  Else 
06.
    MsgBox(y) 
07.
  End If 
08.
Next
Lösen tue ich das so, indem ich in einem ersten Durchlauf zunächst alle Keys der zu löschenden Elemente in einer Liste sammle und dann in einem zweiten Durchlauf die Elemente laut der gesammelten Liste lösche.
01.
Dim ToRemove As New List(Of String) 
02.
For Each k As String In x.Keys 
03.
  Dim y As String = x(k) 
04.
  If y = "Buchstabe C" Or y = "Buchstabe D" Then 
05.
    ToRemove.Add(k) 
06.
  Else 
07.
    MsgBox(y) 
08.
  End If 
09.
Next 
10.
For Each k As String In ToRemove 
11.
  x.Remove(k) 
12.
Next

Geht das nicht auch einfacher?

E.
Mitglied: colinardo
LÖSUNG 26.02.2014, aktualisiert um 18:32 Uhr
Hallo Emeriks,
Geht das nicht auch einfacher?
z.B. so
01.
x.RemoveAt(x.IndexOfValue("Buchstabe C")) 
02.
x.RemoveAt(x.IndexOfValue("Buchstabe D"))
oder so wenn doch mehrere Sachen zu entfernen sind mit Array für die Strings...
01.
Dim arr As String() = {"Buchstabe C", "Buchstabe D"} 
02.
For Each el As String In arr 
03.
    x.RemoveAt(x.IndexOfValue(el)) 
04.
Next
Grüße Uwe
Bitte warten ..
Mitglied: emeriks
26.02.2014 um 16:15 Uhr
Ja, nee is klar ....
Danke!
Bitte warten ..
Neuester Wissensbeitrag
Humor (lol)

Linkliste für Adventskalender

(3)

Information von nikoatit zum Thema Humor (lol) ...

Ähnliche Inhalte
Visual Studio
gelöst VB.Net - Problem mit Umleitung der Standard-Ausgabe (4)

Frage von emeriks zum Thema Visual Studio ...

Visual Studio
gelöst Vb.net Pfadangabe mit Wildcards wie Stern Regex Pattern (2)

Frage von Pilger83 zum Thema Visual Studio ...

Heiß diskutierte Inhalte
Windows Server
DHCP Server switchen (25)

Frage von M.Marz zum Thema Windows Server ...

SAN, NAS, DAS
gelöst HP-Proliant Microserver Betriebssystem (14)

Frage von Yannosch zum Thema SAN, NAS, DAS ...

Grafikkarten & Monitore
Win 10 Grafikkarte Crash von Software? (13)

Frage von Marabunta zum Thema Grafikkarten & Monitore ...

Windows 7
Verteillösung für IT-Raum benötigt (12)

Frage von TheM-Man zum Thema Windows 7 ...