vb6.0程序背景音乐怎么循环播放

vb6.0程序背景音乐如何循环播放
vb6.0程序背景音乐如何循环播放?
我使用的是API sndPlaySound

[解决办法]
Private Declare Function sndPlaySound& Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long)
Const SND_ASYNC = &H1
Const SND_LOOP = &H8
Const SND_NODEFAULT = &H2

Call sndPlaySound("c:\w98.wav", SND_ASYNC Or SND_NODEFAULT Or SND_LOOP)
[解决办法]
会一直播放