Feedback

VB - Anzahl der Einträge eines Registryschlüssels ermitteln

Veröffentlicht von am 03.06.2006
(1 Bewertungen)
Anzahl aller Einträge eines Registryschlüssels ermitteln
GFU-Schulungen  [Anzeige]

XML und .NET Überblick

Um auf dem neuesten Wissensstand zu sein, sollten Sie unser aktuelles ASP .NET Komplett Seminar belegen.
Nach dem Seminar kennen Sie die wichtigsten Strömungen in der Software-Technologie

ASP.NET Core und Angular Komplett für .NET-Entwickler

Sie  lernen in drei (3) Tagen wie man mit  ASP.NET Core und den Technologien  MVC, Entity Framework, WebAPI und  Razor professionelle sowie moderne  Web-Anwendungsarchitekturen aufbaut.  Die Schulung ist der perfekte  Einstieg um insbesondere datengetriebene  und präsentationsorientierte  Applikationen auf Basis der robusten und  skalierbaren ASP.NET Core  Plattform zu erstellen. Nach der Veranstaltung kennen Sie die Konzepte von Angular und können Angular in neue und bestehende ASP.NET-Anwendungen einsetzen.

Imports Microsoft.Win32

Public Enum HKEY_ROOTS As Integer
    HKEY_CLASSES_ROOT = 0
    HKEY_CURRENT_USER = 1
    HKEY_LOCAL_MACHINE = 2
    HKEY_USERS = 3
    HKEY_CURRENT_CONFIG = 4
    VB_AND_VBA_PROGRAM_SETTINGS = 5
End Enum

Public Function CountValueNames(ByVal Root As HKEY_ROOTS, ByVal Path As String) As Integer
    Try
        Select Case Root
            Case 0 : Return Registry.ClassesRoot.OpenSubKey(Path).ValueCount
            Case 1 : Return Registry.CurrentUser.OpenSubKey(Path).ValueCount
            Case 2 : Return Registry.LocalMachine.OpenSubKey(Path).ValueCount
            Case 3 : Return Registry.Users.OpenSubKey(Path).ValueCount
            Case 4 : Return Registry.CurrentConfig.OpenSubKey(Path).ValueCount
            Case 5 : Return Registry.CurrentUser.OpenSubKey("Software\VB and VBA Program Settings\" & Path).ValueCount
            Case Else : Return 0
        End Select
    Catch ex As Exception
        Return 0
    End Try
End Function
Abgelegt unter Registry, Anzahl.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!