Возможно ли занести в label результат работы скрипта? - Visual Basic .NET

Формулировка задачи:

есть скрипт vbs. Возможно ли занести в label vb.net результат его работы? скрипт выдает имя залогинившего пользователя на удаленно машине в сети.

                    Листинг программы
                
strComputer = "srv1" 
Set objWMIService = GetObject("winmgmts:" _ 
    & "{impersonationLevel=impersonate}!\" & strComputer & "\root\cimv2")  
 
Set colComputer = objWMIService.ExecQuery _ 
    ("Select * from Win32_ComputerSystem") 
  
For Each objComputer in colComputer 
    Wscript.Echo "Logged-on user: " & objComputer.UserName 
Next

или может кто знает как по средствам vb.net узнать залогинившего пользователя на удаленный компьютер. заранее спасибо за помощь.

Решение задачи: «Возможно ли занести в label результат работы скрипта?»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Imports System.Management
...
Dim computerName = "srv1"
 
Dim options As New ConnectionOptions With { _
    .Impersonation = ImpersonationLevel.Impersonate _
}
Dim scope As New ManagementScope("\\" & computerName & "\root\cimv2", options)
Dim query As New ObjectQuery("SELECT * FROM Win32_ComputerSystem")
Using searcher As New ManagementObjectSearcher(scope, query)
    Using results As ManagementObjectCollection = searcher.Get()
        Dim wmiObj As ManagementObject = results.Cast(Of ManagementObject)().FirstOrDefault()
        If wmiObj IsNot Nothing Then
            labelUser.Text = wmiObj.GetPropertyValue("UserName").ToString()
        End If
    End Using
End Using