如何获取默认的重定向打印机

Question

我在终端服务器中进行远程连接。包括打印机作为我的本地资源。然后在“设备设置”中，将默认打印机设置为重定向的打印机。

Dim pr As Printer
MsgBox Printer.DeviceName
'- return the default printer which I believe pulled from registry entry
'  "HKCU\Software\Microsoft\Windows NT\CurrentVersion\Windows\Device"

For Each pr In Printers
    MsgBox pr.DeviceName
Next pr
'- return the list of all available printer including from other users       ' session

我在这里想要实现的是返回正确的默认打印机，即重定向的打印机。不是这个Printer.DeviceName

我相信从此注册表HKCU\Software\Microsoft\Windows NT\CurrentVersion\Windows\Device\SessionDefaultDevices\{SessionID}

是否存在将数据提取到此处的功能？