vb中如何插入WMV

右键工具箱-部件-Windows Media Player
工具箱多出一个Windows Media Player的图标，可以在窗体上画一个。
WindowsMediaPlayer的URL属性包含文件路径，打开属性页选择文件即可。

要是片头动画：
新建一个窗体，
然后放上WMP，
打开属性页，做适当的选择（比方说播放器外观，这在用户界面起大作用）。
新窗体的的BorderStyle=0
然后在用代码控制新窗体最先出现。

就可以播放了！

CTRL+T,里面有real控件,用那个指定一个URL就可以了.

如果只是放个声音，建议使用sndPlaysound()函数，放两个命令控件,
Private Const SND_LOOP = &H8 '循环播放模式
Private Const SND_ASYNC = &H1 ’
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
private command1_click() ' 播放
sndPlaySound App.Path & "/**.wav", SND_ASYNC + SND_LOOP
end sub
private command2_click() '取消
Call sndPlaySound(vbNullString, 0)
end sub
未进行调试，仅供参考！！