Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

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, 1472 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 ..
Ähnliche Inhalte
Basic
gelöst Mit vb.net PDF in Word-Dok einfügen (10)

Frage von ahstax zum Thema Basic ...

Visual Studio
Srv records aus dem dns abfragen unter vb.net (14)

Frage von Herbrich19 zum Thema Visual Studio ...

Visual Studio
gelöst Vb.net: Word-Doc seitenweise durchsuchen nach Textmarke (7)

Frage von ahstax zum Thema Visual Studio ...

Visual Studio
gelöst VB.Net - Hilfe bei Regex (8)

Frage von emeriks zum Thema Visual Studio ...

Neue Wissensbeiträge
Humor (lol)

Wohnt jemand in Belgien und kann nicht mehr ruhig ausschlafen?

(3)

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

Sicherheits-Tools

Trendmicro OSCE und das Fall Creators Update Win10 RS3

(3)

Information von Henere zum Thema Sicherheits-Tools ...

Microsoft Office

Text in Zahlen umwandeln

Tipp von logische zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Microsoft Office
ICH BIN AM ENDE MEINES IT-WISSENS ANGELANGT!!!! (38)

Frage von 134537 zum Thema Microsoft Office ...

Windows Server
Gruppenrichtlinie greift nicht zu! (24)

Frage von Syosse zum Thema Windows Server ...

Hosting & Housing
Mailserver Software Empfehlungen (21)

Frage von sunics zum Thema Hosting & Housing ...