semicolon in example

manual tests pass for
- Get-Remote
- Command.Launch()
- Remote.GetVoicemeeter($kindId)
- Remote.RunVoicemeeter($kindId)
- Remote.RunApplication($appId)

CHANGELOG.md

@@ -9,6 +9,31 @@ Before any major/minor/patch is released all unit tests will be run to verify th
 
 ## [Unreleased] These changes have not been added to PSGallery yet
 
+### Added
+
+- Get-Remote factory function to log in and return a base Remote instance without launching Voicemeeter
+- Command.Launch() method to launch Voicemeeter based on `$this.kind.name`, useful for re-launch after Command.Shutdown()
+- Remote.GetVoicemeeter($kindId) to confirm a connection to Voicemeeter and return the requested Remote instance
+- Remote.RunVoicemeeter($kindId) to launch Voicemeeter and return an appropriate Remote instance
+- Remote.RunApplication($appId) to launch VB-Audio applications
+- Remote.GetType(), Remote.GetVersion() to README
+
+## [4.2.0] - 2026-03-15
+
+### Added
+
+- New Remote methods for device enumeration:
+  - GetInputCount()
+  - GetOutputCount()
+  - GetInputDevice($index)
+  - GetOutputDevice($index)
+
+- New IODevice property `driver` to get the driver type of the current device (e.g. 'wdm', 'mme', etc.)
+
+- New IODevice methods to get, set, or clear the current device for a strip or bus:
+  - Get(): returns a PSObject with properties Driver, Name, HardwareId, and IsOutput
+  - Set($device): accepts a PSObject with properties Driver, Name, and IsOutput
+  - Clear()
 
 ## [4.1.0] - 2025-12-23
 

README.md

@@ -78,6 +78,7 @@ Voicemeeter factory function can be:
 - Get-RemoteBasic
 - Get-RemoteBanana
 - Get-RemotePotato
+- Get-Remote : if only lower-level Remote methods are needed
 
 Added in `v3` you may also use the following entry/exit points:
 
@@ -368,20 +369,32 @@ $vmr.bus[0].FadeBy(-10, 500)
 The following Strip.device | Bus.device properties are available:
 
 - name: string
+- driver: string
 - sr: int
 - wdm: string
 - ks: string
 - mme: string
 - asio: string
 
+The following Strip.device | Bus.device methods are available:
+
+- Set($device) : PSObject, where device is a PSObject with properties Driver, Name, and IsOutput
+- Get() : PSObject, returns a PSObject with properties Driver, Name, HardwareId, and IsOutput
+- Clear() : Clears the currently selected device
+
 for example:
 
 ```powershell
 $vmr.strip[0].device.wdm = "Mic|Line|Instrument 1 (Audient EVO4)"
 $vmr.bus[0].device.name | Write-Host
+
+$device = $vmr.strip[3].device.Get()
+$vmr.strip[1].device.Set($device)    # moves the device selected for strip 4 to strip 2
+
+$vmr.bus[2].device.Clear()
 ```
 
-name, sr are defined as read only.
+name, driver, sr are defined as read only.
 wdm, ks, mme, asio are defined as write only.
 asio only defined for Bus[0].Device
 
@@ -539,6 +552,7 @@ The following Command methods are available:
 - HideVBANChat()
 - Restart()
 - Shutdown()
+- Launch() : launches the current Voicemeeter kind
 - Reset() : Reset all config
 - Save($filepath) : string
 - Load($filepath) : string
@@ -563,6 +577,21 @@ $vmr.command.StorePreset()                  # same as StorePreset(''), overwrite
 $vmr.command.RecallPreset('example')
 $vmr.command.RecallPreset(63)
 $vmr.command.RecallPreset()                 # same as RecallPreset(''), recalls last recalled
+
+try {
+    $vmr = Connect-Voicemeeter -Kind 'potato'
+
+    if ($vmr.GetType() -ne 'potato') {
+        $vmr.command.Shutdown()             # shuts down whatever was running
+        Start-Sleep -Seconds 3
+        $vmr.command.Launch()               # launches Voicemeeter Potato
+    }
+
+    # perform operations with Voicemeeter Potato
+}
+finally {
+    Disconnect-Voicemeeter
+}
 ```
 
 StorePreset('') and RecallPreset('') interact with the 'selected' preset. This is highlighted green in the GUI. Recalling a preset selects it. Storing a preset via GUI also selects it. Storing a preset with StorePreset does not select it.
@@ -769,6 +798,63 @@ will load a config file at profiles/banana/config.psd1 for Voicemeeter Banana.
 
 ### Remote class
 
+`$vmr.GetType()` : returns current Voicemeeter kind ('basic', 'banana', 'potato')
+`$vmr.GetVersion()` : returns current Voicemeeter version string (e.g. '2.1.2.2')
+`$vmr.GetVoicemeeter($kindId)` : string, ('basic', 'banana', 'potato'), confirms connection and returns requested Remote instance
+`$vmr.RunVoicemeeter($kindId)` : string, ('basic', 'banana', 'potato'), launches Voicemeeter and returns appropriate Remote instance
+
+example:
+
+```powershell
+try {
+    $vmr = Get-Remote
+
+    $kind = 'none'
+    try {
+        $kind = $vmr.GetType()
+        $vmr = $vmr.GetVoicemeeter($kind)
+    }
+    catch { }
+
+    switch ($kind) {
+        'potato' {
+            break
+        }
+        'basic' {
+            # perform final operations with Voicemeeter Basic
+        }
+        'banana' {
+            # perform final operations with Voicemeeter Banana
+        }
+        { $_ -in 'basic', 'banana'} {
+            $vmr.Command.Shutdown()
+            Start-Sleep -Seconds 3
+        }
+        { $_ -ne 'potato' } {
+            $vmr = $vmr.RunVoicemeeter('potato')
+        }
+    }
+
+    # perform operations with Voicemeeter Potato
+}
+finally {
+    Disconnect-Voicemeeter
+}
+```
+
+`$vmr.RunApplication($appId)` : string, launches VB-Audio applications
+
+- 'devicecheck'
+- 'macrobuttons'
+- 'streamerview'
+- 'busmatrix8'
+- 'busgeq15'
+- 'vban2midi'
+- 'cablecontrolpanel'
+- 'auxcontrolpanel'
+- 'vaio3controlpanel'
+- 'vaiocontrolpanel'
+
 Access to lower level Getters and Setters are provided with these functions:
 
 - `$vmr.Getter(param)`: For getting the value of a parameter expected to return a value other than string.
@@ -793,6 +879,21 @@ Access to lower level polling functions are provided with these functions:
 - `$vmr.PDirty`: Returns true if a parameter has been updated.
 - `$vmr.MDirty`: Returns true if a macrobutton has been updated.
 
+Access to lower level device enumeration functions are provided with these functions:
+
+- `$vmr.GetInputCount()`: Returns the number of available input devices.
+- `$vmr.GetOutputCount()`: Returns the number of available output devices.
+- `$vmr.GetInputDevice($index)`: Returns a PSObject with properties Driver, Name, HardwareId, and IsOutput for the input device at the given index.
+- `$vmr.GetOutputDevice($index)`: Returns a PSObject with properties Driver, Name, HardwareId, and IsOutput for the output device at the given index.
+
+```powershell
+$count = $vmr.GetInputCount()
+for ($i = 0; $i -lt $count; $i++) {
+    $device = $vmr.GetInputDevice($i)
+    Write-Host "Input Device $i: $($device.Driver) - $($device.Name)"
+}
+```
+
 ### Errors
 
 - `VMRemoteError`: Base custom error class.

lib/Voicemeeter.psm1

@@ -40,6 +40,20 @@ class Remote {
         Logout
     }
 
+    [Remote] GetVoicemeeter([String]$kindId) {
+        WaitForConnection
+        return Make_Remote -kindId $kindId
+    }
+
+    [Remote] RunVoicemeeter([String]$kindId) {
+        RunVm -kindId $kindId
+        return Make_Remote -kindId $kindId
+    }
+
+    [void] RunApplication([String]$appId) {
+        RunApp -appId $appId
+    }
+
     [string] GetType() {
         return VmType
     }
@@ -75,6 +89,22 @@ class Remote {
     [void] PDirty() { P_Dirty }
 
     [void] MDirty() { M_Dirty }
+
+    [int] GetOutputCount() {
+        return Device_Count -IS_OUT $true
+    }
+
+    [int] GetInputCount() {
+        return Device_Count
+    }
+
+    [PSObject] GetOutputDevice([int]$index) {
+        return Device_Desc -INDEX $index -IS_OUT $true
+    }
+
+    [PSObject] GetInputDevice([int]$index) {
+        return Device_Desc -INDEX $index
+    }
 }
 
 class RemoteBasic : Remote {
@@ -143,6 +173,30 @@ class RemotePotato : Remote {
     }
 }
 
+function Make_Remote {
+    param(
+        [String]$kindId
+    )
+    switch ($kindId) {
+        'basic' {
+            [RemoteBasic]::new()
+        }
+        'banana' {
+            [RemoteBanana]::new()
+        }
+        'potato' {
+            [RemotePotato]::new()
+        }
+        default { 
+            throw [VMRemoteError]::new("Unknown Voicemeeter kind `"$kindId`"")
+        }
+    }
+}
+
+Function Get-Remote {
+    [Remote]::new('none').Login()
+}
+
 Function Get-RemoteBasic {
     [RemoteBasic]::new().Login()
 }
@@ -177,4 +231,4 @@ Function Disconnect-Voicemeeter {
     Logout
 }
 
-Export-ModuleMember -Function Get-RemoteBasic, Get-RemoteBanana, Get-RemotePotato, Connect-Voicemeeter, Disconnect-Voicemeeter
+Export-ModuleMember -Function Get-Remote, Get-RemoteBasic, Get-RemoteBanana, Get-RemotePotato, Connect-Voicemeeter, Disconnect-Voicemeeter

lib/base.ps1

@@ -11,22 +11,32 @@ function Login {
     }
 
     switch ($retval) {
+        0 {
+            WaitForConnection
+        }
         1 {
-            'Voicemeeter Engine running but GUI not launched. Launching GUI now.' | Write-Verbose
-            RunVoicemeeter -kindId $kindId
+            if ($kindId -eq 'none') {
+                'Logged in to Voicemeeter Remote.' | Write-Verbose
+            }
+            else {
+                'Logged in to Voicemeeter Remote but audio engine and GUI not launched. Launching engine now.' | Write-Verbose
+                RunVm -kindId $kindId
+            }
         }
         -2 {
             throw [LoginError]::new('Login may only be called once per session.')
         }
     }
+}
 
+function WaitForConnection {
     $timeout = New-TimeSpan -Seconds 2
     $sw = [diagnostics.stopwatch]::StartNew()
     $exception = $null
     do {
         Start-Sleep -m 100
         try {
-            'Successfully logged into Voicemeeter [' + $(VmType).ToUpper() + '] Version ' + $(VmVersion) | Write-Verbose
+            'Successfully connected to Voicemeeter [' + $(VmType).ToUpper() + '] Version ' + $(VmVersion) | Write-Verbose
             $exception = $null
             break
         }
@@ -37,7 +47,7 @@ function Login {
     } while ($sw.elapsed -lt $timeout)
 
     if ($null -ne $exception) {
-        throw [VMRemoteError]::new('Timeout logging into the API.')
+        throw [VMRemoteError]::new('Timeout waiting to connect to Voicemeeter.')
     }
 
     while (P_Dirty -or M_Dirty) { Start-Sleep -m 1 }
@@ -52,7 +62,17 @@ function Logout {
     if ($retval -eq 0) { 'Sucessfully logged out' | Write-Verbose }
 }
 
-function RunVoicemeeter {
+function Run {
+    param(
+        [int]$id
+    )
+    $retval = [int][Voicemeeter.Remote]::VBVMR_RunVoicemeeter([Int64]$id)
+    if ($retval -notin @(0)) {
+        throw [CAPIError]::new($retval, 'VBVMR_RunVoicemeeter') 
+    }
+}
+
+function RunVm {
     param(
         [string]$kindId
     )
@@ -61,11 +81,27 @@ function RunVoicemeeter {
         'banana' = $(if ([Environment]::Is64BitOperatingSystem) { 5 } else { 2 })
         'potato' = $(if ([Environment]::Is64BitOperatingSystem) { 6 } else { 3 })
     }
-
-    $retval = [int][Voicemeeter.Remote]::VBVMR_RunVoicemeeter([int64]$kinds[$kindId])
-    if ($retval -notin @(0)) {
-        throw [CAPIError]::new($retval, 'VBVMR_RunVoicemeeter') 
+    Run -id $kinds[$kindId]
+    WaitForConnection
 }
+
+function RunApp {
+    param(
+        [string]$appId
+    )
+    $apps = @{
+        'devicecheck'       = 10
+        'macrobuttons'      = 11
+        'streamerview'      = 12
+        'busmatrix8'        = 13
+        'busgeq15'          = 14
+        'vban2midi'         = 15
+        'cablecontrolpanel' = 20
+        'auxcontrolpanel'   = 21
+        'vaio3controlpanel' = 22
+        'vaiocontrolpanel'  = 23
+    }
+    Run -id $apps[$appId]
 }
 
 function P_Dirty {
@@ -226,3 +262,58 @@ function Get_Level {
     }
     [float]$ptr
 }
+
+function Device_Count {
+    param(
+        [bool]$IS_OUT = $false
+    )
+    if ($IS_OUT) {
+        $retval = [int][Voicemeeter.Remote]::VBVMR_Output_GetDeviceNumber()
+        if ($retval -lt 0) { 
+            throw [CAPIError]::new($retval, 'VBVMR_Output_GetDeviceNumber') 
+        }
+    }
+    else {
+        $retval = [int][Voicemeeter.Remote]::VBVMR_Input_GetDeviceNumber()
+        if ($retval -lt 0) { 
+            throw [CAPIError]::new($retval, 'VBVMR_Input_GetDeviceNumber') 
+        }
+    }
+    $retval
+}
+
+function Device_Desc {
+    param(
+        [int]$INDEX, [bool]$IS_OUT = $false
+    )
+    $driver = 0
+    $name = [System.Byte[]]::new(512)
+    $hardwareid = [System.Byte[]]::new(512)
+
+    if ($IS_OUT) {
+        $retval = [int][Voicemeeter.Remote]::VBVMR_Output_GetDeviceDescA($INDEX, [ref]$driver, $name, $hardwareid)
+        if ($retval -notin @(0)) { 
+            throw [CAPIError]::new($retval, 'VBVMR_Output_GetDeviceDescA') 
+        }
+    }
+    else {
+        $retval = [int][Voicemeeter.Remote]::VBVMR_Input_GetDeviceDescA($INDEX, [ref]$driver, $name, $hardwareid)
+        if ($retval -notin @(0)) { 
+            throw [CAPIError]::new($retval, 'VBVMR_Input_GetDeviceDescA') 
+        }
+    }
+
+    $drivers = @{
+        1 = 'mme'
+        3 = 'wdm'
+        4 = 'ks'
+        5 = 'asio'
+    }
+
+    [PSCustomObject]@{
+        Driver     = $drivers[$driver]
+        Name       = [System.Text.Encoding]::ASCII.GetString($name).Trim([char]0)
+        HardwareId = [System.Text.Encoding]::ASCII.GetString($hardwareid).Trim([char]0)
+        IsOutput   = $IS_OUT
+    }
+}

lib/binding.ps1

@@ -43,6 +43,15 @@ function Setup_DLL {
 
     [DllImport(@"$dll")]
     public static extern int VBVMR_GetLevel(Int64 mode, Int64 index, ref float ptr);
+
+    [DllImport(@"$dll")]
+    public static extern int VBVMR_Output_GetDeviceNumber();
+    [DllImport(@"$dll")]
+    public static extern int VBVMR_Input_GetDeviceNumber();
+    [DllImport(@"$dll")]
+    public static extern int VBVMR_Output_GetDeviceDescA(Int64 index, ref int type, byte[] name, byte[] hardwareid);
+    [DllImport(@"$dll")]
+    public static extern int VBVMR_Input_GetDeviceDescA(Int64 index, ref int type, byte[] name, byte[] hardwareid);
 "@
 
     Add-Type -MemberDefinition $Signature -Name Remote -Namespace Voicemeeter -PassThru | Out-Null

lib/bus.ps1

@@ -97,7 +97,7 @@ class VirtualBus : Bus {
 }
 
 class BusDevice : IODevice {
-    BusDevice ([int]$index, [Object]$remote) : base ($index, $remote) {
+    BusDevice ([int]$index, [Object]$remote) : base ($index, $remote, 'Output') {
         if ($this.index -eq 0) {
             AddStringMembers -PARAMS @('asio') -WriteOnly
         }
@@ -106,6 +106,14 @@ class BusDevice : IODevice {
     [string] identifier () {
         return 'Bus[' + $this.index + '].Device'
     }
+
+    [int] EnumCount () {
+        return $this.remote.GetOutputCount()
+    }
+
+    [PSObject] EnumDevice ([int]$eIndex) {
+        return $this.remote.GetOutputDevice($eIndex)
+    }
 }
 
 function Make_Buses ([Object]$remote) {

lib/command.ps1

@@ -7,6 +7,11 @@ class Special : IRemote {
         return 'Command'
     }
 
+    [void] Launch() {
+        'Launching Voicemeeter audio engine and GUI' | Write-Verbose
+        RunVm -kindId $this.remote.kind.name
+    }
+
     [void] RunMacrobuttons() {
         'Launching the MacroButtons app' | Write-Verbose
         Start-Process -FilePath $(Join-Path -Path $this.remote.vmpath -ChildPath 'VoicemeeterMacroButtons.exe')

lib/io.ps1

@@ -100,9 +100,123 @@ class EqCell : IRemote {
 }
 
 class IODevice : IRemote {
-    IODevice ([int]$index, [Object]$remote) : base ($index, $remote) {
+    [string]$kindOfDevice
+    [Hashtable]$drivers
+    
+    IODevice ([int]$index, [Object]$remote, [string]$kindOfDevice) : base ($index, $remote) {
+        $this.kindOfDevice = $kindOfDevice
+        
         AddStringMembers -WriteOnly -PARAMS @('wdm', 'ks', 'mme')
         AddStringMembers -ReadOnly -PARAMS @('name')
         AddIntMembers -ReadOnly -PARAMS @('sr')
+
+        $this.drivers = @{
+            '1'   = 'mme'
+            '4'   = 'wdm'
+            '8'   = 'ks'
+            '256' = 'asio'
         }
     }
+
+    [int] EnumCount () {
+        throw [System.NotImplementedException]::new("$($this.GetType().Name) must override EnumCount()")
+    }
+
+    [PSObject] EnumDevice ([int]$eIndex) {
+        throw [System.NotImplementedException]::new("$($this.GetType().Name) must override EnumDevice()")
+    }
+
+    [PSObject] Get () {
+        $device = [PSCustomObject]@{
+            Driver     = $this.driver
+            Name       = $this.name
+            HardwareId = ''
+            IsOutput   = $this.kindOfDevice -eq 'Output'
+        }
+        if (-not [string]::IsNullOrEmpty($device.Name)) {
+            for ($i = 0; $i -lt $this.EnumCount(); $i++) {
+                $eDevice = $this.EnumDevice($i)
+                if ($eDevice.Name -eq $device.Name -and $eDevice.Driver -eq $device.Driver) {
+                    $device = $eDevice
+                    break
+                }
+            }
+        }
+        return $device
+    }
+
+    [void] Set ([PSObject]$device) {
+        $required = 'IsOutput', 'Driver', 'Name'
+        $missing = $required | Where-Object { $null -eq $device.PSObject.Properties[$_] }
+
+        if ($missing) {
+            throw [System.ArgumentException]::new(("Invalid device object. Missing member(s): {0}" -f ($missing -join ', ')), 'device')
+        }
+
+        $expectsOutput = ($this.kindOfDevice -eq 'Output')
+        if ([bool]$device.IsOutput -ne $expectsOutput) {
+            throw [System.ArgumentException]::new(("Device direction mismatch. Expected IsOutput={0}." -f $expectsOutput), 'device')
+        }
+
+        $d = $device.Driver
+        $n = $device.Name
+
+        if (-not ($d -is [string])) {
+            throw [System.ArgumentException]::new('Invalid device object. Driver must be a string.', 'device')
+        }
+        if (-not ($n -is [string])) {
+            throw [System.ArgumentException]::new('Invalid device object. Name must be a string.', 'device')
+        }
+
+        if ($d -eq '' -and $n -eq '') { $this.Clear(); return }
+        if ($d -notin $this.drivers.Values) {
+            throw [System.ArgumentOutOfRangeException]::new('device.Driver', $d, 'Invalid device driver provided to Set method.')
+        }
+
+        $this.Setter($d, $n)
+    }
+
+    [void] Clear () {
+        $this.Setter('mme', '')
+    }
+
+    hidden $_driver = $($this | Add-Member ScriptProperty 'driver' `
+        {
+            if ([string]::IsNullOrEmpty($this.name)) { return '' }
+            
+            $type = $null
+            try {
+                $tmp = [System.IO.Path]::Combine([System.IO.Path]::GetTempPath(), "vmrtmp-$(New-Guid).xml")
+                $this.remote.Setter('Command.Save', $tmp)
+
+                $timeout = New-TimeSpan -Seconds 2
+                $sw = [Diagnostics.Stopwatch]::StartNew()
+                $line = $null
+                do {
+                    if (Test-Path $tmp) {
+                        try {
+                            $line = Get-Content $tmp | Select-String -Pattern "<$($this.kindOfDevice)Dev index='$($this.index + 1)'" -List
+                            if ($line) { break }
+                        }
+                        catch {}
+                    }
+                    Start-Sleep -Milliseconds 20
+                } while ($sw.elapsed -lt $timeout)
+                if ($line -and $line.ToString() -match "type='(?<type>\d+)'") {
+                    $type = $matches['type']
+                }
+            }
+            finally {
+                if (Test-Path $tmp) {
+                    Remove-Item $tmp -Force
+                }
+            }
+
+            if ($type -notin $this.drivers.Keys) { return 'unknown' }
+            return $this.drivers[$type]
+        } `
+        {
+            Write-Warning ("ERROR: $($this.identifier()).driver is read only")
+        }
+    )
+}

lib/kinds.ps1

@@ -1,4 +1,7 @@
 $KindMap = @{
+    'none'   = @{
+        'name' = 'none'
+    }
     'basic'  = @{
         'name'      = 'basic'
         'p_in'      = 2

lib/strip.ps1

@@ -155,12 +155,20 @@ class StripEq : IOEq {
 }
 
 class StripDevice : IODevice {
-    StripDevice ([int]$index, [Object]$remote) : base ($index, $remote) {
+    StripDevice ([int]$index, [Object]$remote) : base ($index, $remote, 'Input') {
     }
 
     [string] identifier () {
         return 'Strip[' + $this.index + '].Device'
     }
+
+    [int] EnumCount () {
+        return $this.remote.GetInputCount()
+    }
+
+    [PSObject] EnumDevice ([int]$eIndex) {
+        return $this.remote.GetInputDevice($eIndex)
+    }
 }
 
 class VirtualStrip : Strip {

tests/higher.Tests.ps1

@@ -850,24 +850,47 @@ Describe -Tag 'higher', -TestName 'All Higher Tests' {
             @{ Index = $phys_in }
         ) {
             Context 'Device' -ForEach @(
-                @{ Value = 'testInput' }, @{ Value = '' }
+                @{ Driver = 'mme'; Value = 'testMme'; Expected = 'mme' }
+                @{ Driver = 'wdm'; Value = 'testWdm'; Expected = 'wdm' }
+                @{ Driver = 'ks'; Value = 'testKs'; Expected = 'ks' }
+                @{ Driver = 'mme'; Value = ''; Expected = '' }
             ) {
-                It "Should set Strip[$index].Device.wdm" {
-                    $vmr.strip[$index].device.wdm = $value
+                BeforeEach {
+                    $vmr.strip[$index].device.Clear()
                     Start-Sleep -Milliseconds 800
-                    $vmr.strip[$index].device.name | Should -Be $value
                 }
                 
-                It "Should set Strip[$index].Device.ks" {
-                    $vmr.strip[$index].device.ks = $value
+                It "Should set Strip[$index].Device.$($driver)" {
+                    $vmr.strip[$index].device.name | Should -Be ''
+                    $vmr.strip[$index].device.driver | Should -Be ''
+                    
+                    $vmr.strip[$index].device.$($driver) = $value
                     Start-Sleep -Milliseconds 800
                     $vmr.strip[$index].device.name | Should -Be $value
+                    $vmr.strip[$index].device.driver | Should -Be $expected
                 }
 
-                It "Should set Strip[$index].Device.mme" {
-                    $vmr.strip[$index].device.mme = $value
+                It "Should set Strip[$index].Device" -ForEach @(
+                    @{
+                        Clear  = [PSCustomObject]@{ Driver = ''; Name = ''; HardwareId = ''; IsOutput = $false }
+                        Device = [PSCustomObject]@{ Driver = $expected; Name = $value; HardwareId = ''; IsOutput = $false }
+                    }
+                ) {
+                    $initial = $vmr.strip[$index].device.Get()
+                    
+                    $initial.Driver | Should -Be $clear.Driver
+                    $initial.Name | Should -Be $clear.Name
+                    $initial.HardwareId | Should -Be $clear.HardwareId
+                    $initial.IsOutput | Should -Be $clear.IsOutput
+                    
+                    $vmr.strip[$index].device.Set($device)
                     Start-Sleep -Milliseconds 800
-                    $vmr.strip[$index].device.name | Should -Be $value
+                    $result = $vmr.strip[$index].device.Get()
+                    
+                    $result.Driver | Should -Be $device.Driver
+                    $result.Name | Should -Be $device.Name
+                    $result.HardwareId | Should -Be $device.HardwareId
+                    $result.IsOutput | Should -Be $device.IsOutput
                 }
             }
 
@@ -983,24 +1006,47 @@ Describe -Tag 'higher', -TestName 'All Higher Tests' {
             @{ Index = $phys_out }
         ) {
             Context 'Device' -ForEach @(
-                @{ Value = 'testOutput' }, @{ Value = '' }
+                @{ Driver = 'mme'; Value = 'testMme'; Expected = 'mme' }
+                @{ Driver = 'wdm'; Value = 'testWdm'; Expected = 'wdm' }
+                @{ Driver = 'ks'; Value = 'testKs'; Expected = 'ks' }
+                @{ Driver = 'mme'; Value = ''; Expected = '' }
             ) {
-                It "Should set Bus[$index].Device.wdm" {
-                    $vmr.bus[$index].device.wdm = $value
+                BeforeEach {
+                    $vmr.bus[$index].device.Clear()
                     Start-Sleep -Milliseconds 800
-                    $vmr.bus[$index].device.name | Should -Be $value
                 }
                 
-                It "Should set Bus[$index].Device.ks" {
-                    $vmr.bus[$index].device.ks = $value
+                It "Should set Bus[$index].Device.$($driver)" {
+                    $vmr.bus[$index].device.name | Should -Be ''
+                    $vmr.bus[$index].device.driver | Should -Be ''
+                    
+                    $vmr.bus[$index].device.$($driver) = $value
                     Start-Sleep -Milliseconds 800
                     $vmr.bus[$index].device.name | Should -Be $value
+                    $vmr.bus[$index].device.driver | Should -Be $expected
                 }
 
-                It "Should set Bus[$index].Device.mme" {
-                    $vmr.bus[$index].device.mme = $value
+                It "Should set Bus[$index].Device" -ForEach @(
+                    @{
+                        Clear  = [PSCustomObject]@{ Driver = ''; Name = ''; HardwareId = ''; IsOutput = $true }
+                        Device = [PSCustomObject]@{ Driver = $expected; Name = $value; HardwareId = ''; IsOutput = $true }
+                    }
+                ) {
+                    $initial = $vmr.bus[$index].device.Get()
+                    
+                    $initial.Driver | Should -Be $clear.Driver
+                    $initial.Name | Should -Be $clear.Name
+                    $initial.HardwareId | Should -Be $clear.HardwareId
+                    $initial.IsOutput | Should -Be $clear.IsOutput
+                    
+                    $vmr.bus[$index].device.Set($device)
                     Start-Sleep -Milliseconds 800
-                    $vmr.bus[$index].device.name | Should -Be $value
+                    $result = $vmr.bus[$index].device.Get()
+                    
+                    $result.Driver | Should -Be $device.Driver
+                    $result.Name | Should -Be $device.Name
+                    $result.HardwareId | Should -Be $device.HardwareId
+                    $result.IsOutput | Should -Be $device.IsOutput
                 }
             }
         }
@@ -1009,24 +1055,47 @@ Describe -Tag 'higher', -TestName 'All Higher Tests' {
             @{ Index = $virt_out }
         ) {
             Context 'Device' -Skip:$ifNotBasic -ForEach @(
-                @{ Value = 'testOutput' }, @{ Value = '' }
+                @{ Driver = 'mme'; Value = 'testMme'; Expected = 'mme' }
+                @{ Driver = 'wdm'; Value = 'testWdm'; Expected = 'wdm' }
+                @{ Driver = 'ks'; Value = 'testKs'; Expected = 'ks' }
+                @{ Driver = 'mme'; Value = ''; Expected = '' }
             ) {
-                It "Should set Bus[$index].Device.wdm" {
-                    $vmr.bus[$index].device.wdm = $value
+                BeforeEach {
+                    $vmr.bus[$index].device.Clear()
                     Start-Sleep -Milliseconds 800
-                    $vmr.bus[$index].device.name | Should -Be $value
                 }
                 
-                It "Should set Bus[$index].Device.ks" {
-                    $vmr.bus[$index].device.ks = $value
+                It "Should set Bus[$index].Device.$($driver)" {
+                    $vmr.bus[$index].device.name | Should -Be ''
+                    $vmr.bus[$index].device.driver | Should -Be ''
+                    
+                    $vmr.bus[$index].device.$($driver) = $value
                     Start-Sleep -Milliseconds 800
                     $vmr.bus[$index].device.name | Should -Be $value
+                    $vmr.bus[$index].device.driver | Should -Be $expected
                 }
 
-                It "Should set Bus[$index].Device.mme" {
-                    $vmr.bus[$index].device.mme = $value
+                It "Should set Bus[$index].Device" -ForEach @(
+                    @{
+                        Clear  = [PSCustomObject]@{ Driver = ''; Name = ''; HardwareId = ''; IsOutput = $true }
+                        Device = [PSCustomObject]@{ Driver = $expected; Name = $value; HardwareId = ''; IsOutput = $true }
+                    }
+                ) {
+                    $initial = $vmr.bus[$index].device.Get()
+                    
+                    $initial.Driver | Should -Be $clear.Driver
+                    $initial.Name | Should -Be $clear.Name
+                    $initial.HardwareId | Should -Be $clear.HardwareId
+                    $initial.IsOutput | Should -Be $clear.IsOutput
+                    
+                    $vmr.bus[$index].device.Set($device)
                     Start-Sleep -Milliseconds 800
-                    $vmr.bus[$index].device.name | Should -Be $value
+                    $result = $vmr.bus[$index].device.Get()
+                    
+                    $result.Driver | Should -Be $device.Driver
+                    $result.Name | Should -Be $device.Name
+                    $result.HardwareId | Should -Be $device.HardwareId
+                    $result.IsOutput | Should -Be $device.IsOutput
                 }
             }
         }