WindowsMediaPlayer1 de VB tiene solo un canal, ¡pero quiero que suenen ambos altavoces!
Dim SC As IWMPControls3
Dim i As Integer
Establecer SC = WindowsMediaPlayer1.Controls
"Obtener todas las pistas de idioma
For i = 1 a SC.getAudioLanguageID(i))
下注
'Los formatos generales de vídeo KTV, MPEG, MPG y DAT generalmente tienen 3 canales, currentAudioLanguageIndex=1 significa estéreo, 2 significa izquierda canal, 3 significa el canal derecho; los formatos MP4 y MKV tienen 2 canales, currentAudioLanguageIndex=1 significa la primera pista, 2 significa la segunda pista currentAudioLanguageIndex = 2
End If
<. el botón de acompañamientoSi SC.audioLanguageCount = 3 Entonces
SC.currentAudioLanguageIndex = 2
ElseIf SC.audioLanguageCount = 2 Entonces
SC.currentAudioLanguageIndex = 1
Finalizar si