It's not a pure solution, but it keeps everything inside my KiX script and most importantly: IT WORKS!!

That's a handy object to keep in mind for future needs. Thanks!

 Code:
	$VBScriptCode = '

Dim strData
Sub MySub()
	Const HKEY_LOCAL_MACHINE = &H80000002
	strComputer = "' + $txtComp.Text + '"
	strRegPath = "System\CurrentControlSet\Services\TCPIP\Linkage"
	strRegVal = "Bind"

	Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")

	Return = oReg.GetMultiStringValue(HKEY_LOCAL_MACHINE,strRegPath,strRegVal,arrValues)
	If (Return = 0) And (Err.Number = 0) Then
		For Each strValue In arrValues
			strData = strData & "{}{}" & strValue & vbCrLf
		Next
	Else
	End If
End Sub'

	$VBScript = CreateObject("ScriptControl")
	$VBScript.Language = "VBScript"
	$VBScript.AddCode($VBScriptCode)
	$ = $VBScript.Run("MySub")
	$aryReg = Split($VBScript.CodeObject.strData, "{}{}")
	For Each $Element In $aryReg
		$ = messagebox($Element, "Element")
	Next