（vb编程）－－－如何播放声音或视频

三种方法 1 vb有现成的控件
2 用DirectShow和DirectSound
3 用相应的api

问题其实可以如此的解决：

使用vb的api函数：mcisendstring

Public Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

1：判断鼠标是否在picture box的区域之内，根据鼠标的坐标位置和

picture box的坐标位置进行比较就可以。

2：使用mcisendstring函数就好：

例子：mcisendstring（"c:\aa.wav","play",vbnullstring,vbnullstring)

命令你还是要看看资料，因为没有环境，不能给你完整的代码！！！！

你自己决定它放不放，或者让它自动播放，还是点了才播放啊？把问题说清楚一些。

有控件的，自己找找

直接调用activeX控件就可以了

不用控件，就用函数呗。