vba查询注册表

不要忘了路径后面的斜线

Function PrismPath()
          Set wshShell = CreateObject("WScript.Shell")
          PrismPath = wshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\prism.exe\")
End Function
posted @ 2020-11-12 10:23  wtlafoxmail  阅读(191)  评论(0)    收藏  举报