Vb encuentra varios problemas al utilizar wmp.dll para controlar la producción de reproductores multimedia

La primera pregunta: ¿Por qué puedo? (Tal vez usaste esta línea antes de que el jugador jugara, esta propiedad debe usarse después de que se reproduzca el control, así que pongo el código aquí):

Private Sub wmp_PlayStateChange(ByVal NewState As Long)

Si NewState = 3 Then Text1.Text = wmp.currentMedia.durationString

End Sub

Segunda pregunta: Probé con Key_press y el resultado fue normal (solo asegúrate nkeyAscii es igual a 32)

Tercera pregunta: No es posible, probé varios tipos de archivos pero todos funcionan.

wmp.settings.balance = -100 'Usé esta oración y la configuré en el canal izquierdo.

Cuarta pregunta: Te refieres al largo y ancho original del vídeo, cierto, así que puedes usar estas oraciones:

wmp.Controls.currentItem.imageSourceHeight 'Este es el ancho original

wmp.Controls.currentItem.imageSourceWidth 'Esta es la longitud original

Asimismo, la declaración anterior debe ejecutarse correctamente después de que el jugador comience a jugar.

Quinta pregunta: Hasta donde yo sé, no hay... (lo siento mucho)

Sexta pregunta: Cambiar el subcomando privado1_click() en form1 es el subcomando1_click() público , y luego puedes llamar a form1 en form2 llamando a form1.command1_click.

P7:

Sub privado Wmp_PlayStateChange(ByVal NewState As Long)

Si NewState = wmppsMediaEnded Entonces

Debug.Print "terminado"

End If

End Sub

¡El código anterior funciona bien!

Hermano, trabajaste muy duro escribiendo, ¿puedes darme algo?