Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click AxWindowsMediaPlayer1.URL = "C:\vb\test.mp4" End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click DirectCast(AxWindowsMediaPlayer1.Ctlcontrols, WMPLib.IWMPControls2).step(1) End Sub