If you would like sound, use the Multimedia Control.

Code:
MMControl1.Command = "Open"
MMControl1.DeviceType = "AVIVideo"
MMControl1.Command = "Play"