Return Escalated Powershell Variable to VBScript

Question

I am trying to return the state of Hyper-V into a VBScript. In order to do this, I need to execute the following command:

Get-WindowsOptionalFeature -FeatureName Microsoft-Hyper-V-All -Online

If I set this as a variable, then I can echo the state and get Enabled or Disabled. e.g.

PS> $hyperv = Get-WindowsOptionalFeature -FeatureName Microsoft-Hyper-V-All -Online
PS> echo $hyperv.State
Enabled

PS>

In order to run this though, I need to have escalated privileges. So, by running the following, that will get me into escalated mode.

PS> Start-Process powershell -Verb runAs

or from cmd.exe

c:\> powershell -noexit -command Start-Process powershell -Verb runAs

I see problems that I have to overcome; the first being that I need to get a powershell in escalated mode, and the second is getting the command to run and return to a variable. Where I am lost is how do I return this state as variable to the VBScript.

Update 1:

This command:

powershell.exe Start-Process powershell.exe -ArgumentList '-command $hyperv = Get-WindowsOptionalFeature -FeatureName Microsoft-Hyper-V-All -Online; echo $hyperv.State' -verb RunAs

returns the state of HyperV in a powershell. Now I just need to get this variable into a VBScript.

** Update 2: **

Here is the gist of my attempt to set the variable with the return value.

set shell = CreateObject("WScript.Shell")

HyperVStateCommand = "powershell.exe Start-Process powershell.exe -ArgumentList '-command $hyperv = Get-WindowsOptionalFeature -FeatureName Microsoft-Hyper-V-All -Online; echo $hyperv.State' -verb RunAs"

set HyperVCheck = shell.Exec(HyperVStateCommand)
HyperVStatus = HyperVCheck.StdOut.ReadAll

msgBox HyperVStatus

The PowerShell opens and displays "Enabled" before closing. If you add -noexit in the ArgumentList (before -command), the powershell will stay open so that you can see the value.

The message box that comes up is blank though. HyperVStatus isn't being assigned the value from powershell.