如何用vb实现背景音乐代码

点击vb菜单-工具-资源编辑器，用鼠标加宽，按倒数第二个按钮，添加你的wav文件，类型叫“WAVE”，标识号是“MySound”。注意双引号，然后保存资源文件。示例和代码如下，只对生成程序有效:

私有声明函数PlaySound Lib "winmm.dll "别名" PlaySoundA " \u

(字符串形式的ByVal lpszName、Long形式的ByVal hModule、Long形式的ByVal dwFlags)

私有常量SND _ ASYNC & amp= & ampH1

私有构造SND _ NODEFAULT & amp= & amp氘

私人建筑和资源。= & ampH40004

Dim hInst As Long

Dim sSoundName作为字符串

Dim lFlags一样长

Dim lRet一样长

私有子窗体_Load()

hInst = App.hInstance

sSoundName = "我的声音"

lFlags = SND _ RESOURCE+SND _ ASYNC+SND _ NODEFAULT

lRet = PlaySound(sSoundName，hInst，lFlags)

末端接头