Feedback

VB - Einträge eines Registryschlüssels Enumerieren

Veröffentlicht von am 03.06.2006
(2 Bewertungen)
Alle Einträge eines Registryschlüssels enumerieren (aufzählen) und in einem Array speichern
GFU-Schulungen  [Anzeige]

Visual Studio Team Foundation Server 2017/2015 (TFS) für Entwickler - Kompakt

Nach Teilnahme an dieser Schulung kennen Sie alle wesentlichen Funktionen des TFS für Entwickler. Sie setzen Software-Entwicklung mit dem Visual Studio Team Foundation Server erfolgreich um.

VB.NET Einführung

Die Schulung zeigt Ihnen, wie Sie einfache, benutzerorientierte Programme, die auf Datenbanken zugreifen, in VB.NET eigenständig entwickeln. 

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 EnumValueNames(ByVal Root As HKEY_ROOTS, ByVal Path As String) As String()
    Try
        Select Case Root
            Case 0 : Return Registry.ClassesRoot.OpenSubKey(Path).GetValueNames
            Case 1 : Return Registry.CurrentUser.OpenSubKey(Path).GetValueNames
            Case 2 : Return Registry.LocalMachine.OpenSubKey(Path).GetValueNames
            Case 3 : Return Registry.Users.OpenSubKey(Path).GetValueNames
            Case 4 : Return Registry.CurrentConfig.OpenSubKey(Path).GetValueNames
            Case 5 : Return Registry.CurrentUser.OpenSubKey("Software\VB and VBA Program Settings\" & Path).GetValueNames
            Case Else : Return Nothing
        End Select
    Catch ex As Exception
        Return Nothing
    End Try
End Function
Abgelegt unter Registry, Enumerieren.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!