Добрый день, уважаемые форумчане!
Подскажите пожалуйста как записать значение из HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion \Authentication\LogonUI в переменную VBA для дальнейшего использования в проекте?
Никак не пойму что я делаю не так?
Подскажите пожалуйста как записать значение из HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion
Никак не пойму что я делаю не так?
Код |
---|
Public Sub ReadUserName() Dim readUserValue As Object Set readUserValue = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Authentication\LogonUI", "LastLoggedOnDisplayName", Nothing) MsgBox ("The value is " & readUserValue) End Sub |