style: 切换逻辑移位

This commit is contained in:
tangge233
2025-03-15 00:36:06 +08:00
parent 7dff62aebf
commit 39b84e8701
+6 -8
View File
@@ -349,7 +349,12 @@ Public Module ModMusic
Public Sub OnDefaultDeviceChanged(dataFlow As DataFlow, role As Role, defaultDeviceId As String) Implements IMMNotificationClient.OnDefaultDeviceChanged Public Sub OnDefaultDeviceChanged(dataFlow As DataFlow, role As Role, defaultDeviceId As String) Implements IMMNotificationClient.OnDefaultDeviceChanged
' 处理默认音频设备更改事件 ' 处理默认音频设备更改事件
If MusicNAudio Is Nothing Then Exit Sub If MusicNAudio Is Nothing Then Exit Sub
CType(MusicNAudio, NAudio.Wave.WaveOut).DeviceNumber = 0 ' 切换到系统默认输出设备
Log($"音频默认输出设备切换到 {defaultDeviceId}")
Dim target As NAudio.Wave.WaveOut = MusicNAudio
target.Stop()
target.DeviceNumber = 0
target.Resume()
End Sub End Sub
Public Sub OnDeviceAdded(deviceId As String) Implements IMMNotificationClient.OnDeviceAdded Public Sub OnDeviceAdded(deviceId As String) Implements IMMNotificationClient.OnDeviceAdded
@@ -385,13 +390,6 @@ Public Module ModMusic
Public Sub OnDefaultDeviceChanged(dataFlow As DataFlow, role As Role, defaultDeviceId As String) Implements IMMNotificationClient.OnDefaultDeviceChanged Public Sub OnDefaultDeviceChanged(dataFlow As DataFlow, role As Role, defaultDeviceId As String) Implements IMMNotificationClient.OnDefaultDeviceChanged
container.OnDefaultDeviceChanged(dataFlow, role, defaultDeviceId) container.OnDefaultDeviceChanged(dataFlow, role, defaultDeviceId)
' 切换到系统默认输出设备
If MusicNAudio IsNot Nothing Then
Dim target As NAudio.Wave.WaveOut = MusicNAudio
target.Stop()
target.DeviceNumber = 0
target.Resume()
End If
End Sub End Sub
Public Sub OnDeviceAdded(deviceId As String) Implements IMMNotificationClient.OnDeviceAdded Public Sub OnDeviceAdded(deviceId As String) Implements IMMNotificationClient.OnDeviceAdded