Sub GetOSInfo_by_OSLibrary
Dim OSL As OperatingSystem
Dim BootLoader As String
Dim Release As String
BootLoader = OSL.BootLoader
Release = OSL.Release
Msgbox("BootLoader: " & BootLoader & CRLF & "Release: " & Release, "GetOSInfo_by_OSLibrary")
End Sub