Hola , tenes que enganchar la propiedad .Value del slider con la propiedad .Controls.currentPosition del windows media, aca te dejo un codigo asi nomas lo hice fijate si te sirve:
el slider cambia los valores segun la duraccion total del video y si moves el slider te mueve el video..
saludos.
Código (vb) [Seleccionar]
Private Sub Slider1_Change()
WindowsMediaPlayer1.Controls.currentPosition = Slider1.Value
End Sub
Private Sub Slider1_Scroll()
Call Slider1_Change
End Sub
Private Sub WindowsMediaPlayer1_OpenStateChange(ByVal NewState As Long)
Slider1.Min = 0
Slider1.Max = WindowsMediaPlayer1.currentMedia.duration
End Sub
el slider cambia los valores segun la duraccion total del video y si moves el slider te mueve el video..
saludos.