Cara Membuat Video Player Sederhana Dengan VB

Disini saya akan menjelaskan cara membuat video player sederhana menggunakan Visual Basic 6, dan saya akan memberikan gambarannya seperti yang di bawah ini :

Untuk Kodingannya seperti yang ada di bawah ini :

Private Sub Form_Resize()
WindowsMediaPlayer1.Width = Me.ScaleWidth
WindowsMediaPlayer1.Height = Me.ScaleHeight
End Sub

Private Sub mnAbout_Click()
Me.Hide
frmAbout.Show

End Sub

Private Sub mnexit_Click()
End
End Sub

Private Sub mnopen_Click()
On Error Resume Next
CommonDialog1.ShowOpen
WindowsMediaPlayer1.URL = CommonDialog1.FileName
End Sub