如何做背景音乐
请问如何在VB程序里做背景音乐 问题点数:0、回复次数:4Top
1 楼nik_Amis(...)回复于 2002-12-04 12:03:09 得分 0
Dim aWave() As Byte
aWave = LoadResData("A", "WAVE")
Private Function PlayWave() As Boolean
Dim r As Long
Dim uFlags As Long
uFlags = SND_ASYNC Or SND_NODEFAULT Or SND_MEMORY or SND_LOOP
r = sndStopSound(0, SND_ASYNC)
r = sndPlaySound(aWave(0), uFlags)
End FunctionTop
2 楼tgc99(△〖极限冲锋〗◇)回复于 2002-12-04 13:08:19 得分 0
楼上不错。Top
3 楼cnnps(诸葛晓光)回复于 2002-12-04 13:16:50 得分 0
音乐文件怎么没看到呢。Top
4 楼fzn0621(烈无焰)回复于 2002-12-04 14:31:00 得分 0
我记得SND_ASYNC 是立即返回、SND_SYNC 是播放完后再返回、SND_LOOP 是循环播放啊,sndPlaySound好象只有这三个参数的嘛?这SND_ASYNC Or SND_NODEFAULT Or SND_MEMORY or SND_LOOP四个东西or起来是个什么东西哇?SND_NODEFAULT 又是什么呢?还有SND_MEMORY又是什么呢??sndStopSound涵数有是干嘛用的呢?停止播放??
在下真是一头雾水,望高手指教多多指教!!!Top




