用代码怎样给Access数据库加入音乐

其实Access并不是作为一个播放器存在的……还是贴一段代码上来吧：

Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

Public Const HWND_TOPMOST = -1

Public Const HWND_NOTOPMOST = -2

Public Const SWP_NOMOVE = &H2

Public Const SWP_NOSIZE = &H1

Public Const SWP_NOACTIVATE = &H10

Public Const SWP_SHOWWINDOW = &H40

Public Const TOPMOST_FLAGS = SWP_NOMOVE Or SWP_NOSIZE

'函数调用：

'Call sndPlaySound(CurrentProject.Path &"\sound\sok" &n &".wav", 1)

1.打开Access数据库（2003）直接进入窗体的设置步骤： 在菜单栏点击，工具①-->启动②-->设置启动窗体③，如图。 2.Access2007的设置方法： 点击数据库左上角的Office按钮-->Access选项-->d出的对话框左边选择“当前数据库” -->设置显示窗体。

放入光盘是不行的，你去下一个ActiveX控件，如果要了解ActiveX可以去

http://baike.baidu.com/view/28141.htm看一下

要去解决这个可以去

http://www.activex.com.cn/media_activex/

这个里面下一个控件就OK了

---