How can I get a future proof user friendly operating system version?
The WMI classes can be used to extract the required data as follows:
Public Function GetFriendlyOSVersion() As String Dim query As String query = "SELECT Caption FROM Win32_OperatingSystem" Dim results As Object Set results = GetObject("Winmgmts:").ExecQuery(query) Dim info As Object For Each info In results GetFriendlyOSVersion = info.Caption Next infoEnd Function