[视频播放]如何在form中实现视频文件的播放。
我想在form中实现视频文件的播放,但是按照如下方法不行:
Private Sub Form_Load()
MMControl1.DeviceType = ″avivideo″
MMControl1.FileName = "C:\avi\cd.avi"
MMControl1.hWndDisplay = Picture1.hWnd
MMControl1.Command = ″open″
MMControl1.Command = ″play″
End Sub
有什么办法吗?请指点!