Hatten Sie nicht auch schon einmal das Problem, den Enum-Wert einer Auflistung anhand eines Strings (Zeichenkette) ermitteln zu müssen? Beispiel: ' Enum-Auflistung Private Enum Wochentag Sonntag = 0 Montag Dienstag Mittwoch Donnerstag Freitag Samstag End Enum Anhand eines Strings mit der Enum-Zeichenfolge (bspw. "Donnerstag") soll jetzt der dazugehörige Wert aus der Enum-Auflistung "Wochentag" ermittelt werden. Eine Möglichkeit wäre jetzt, anhand einer "Select Case"-Abfrage den Wert zu ermitteln: Dim sWochentag As String = "Donnerstag" Dim nWochentag As Wochentag Select Case sWochentag Case "Sonntag" nWochentag = Wochentag.Sonntag Case "Montag" nWochentag = Wochentag.Montag Case "Dienstag" nWochentag = Wochentag.Dienstag Case "Mittwoch" nWochentag = Wochentag.Mittwoch Case "Donnerstag" nWochentag = Wochentag.Donnerstag Case "Freitag" nWochentag = Wochentag.Freitag Case "Samstag" nWochentag = Wochentag.Samstag End Select Die Variable "nWochentag" hätte nach Abarbeitung der Select-Case Abfrage jetzt den Wert 4 (Wochentag.Donnerstag) Dieser Code ist jedoch nicht gerade effizient und auch den entscheidenden Nachteil, dass man diesen wieder anpassen muss, wenn sich die Enum-Auflistung ändert oder erweitert wird. Mit der Parse-Methode des System.Enum-Klasse geht das ganze jedoch viel einfacher! Dim sWochentag As String = "Donnerstag" Dim nWochentag As Wochentag nWochentag = CType(System.Enum.Parse(nWochentag.GetType(), sWochentag), Wochentag) Dieser Tipp wurde bereits 24.842 mal aufgerufen. Voriger Tipp | Zufälliger Tipp | Nächster Tipp
Anzeige
Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv Vol.6 (einschl. Beispielprojekt!) Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! - nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten - Symbol-Galerie mit mehr als 3.200 Icons im modernen Look Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m. |
TOP! Unser Nr. 1 Neu! sevDataGrid 3.0 Mehrspaltige Listen, mit oder ohne DB-Anbindung. Autom. Sortierung, Editieren von Spalteninhalten oder das interaktive Hinzufügen von Datenzeilen sind ebenso möglich wie das Erstellen eines Web-Reports. Tipp des Monats April 2024 Skyfloy Chart von Microsoft und dazu noch gratis Tutorial für Microsoft Chart Controls für Microsoft .NET Framework 3.5 Access-Tools Vol.1 Über 400 MByte Inhalt Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB |
||||||||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |