VB提供的方法使我們可以很容易地使用資源文件中的字符、圖片等資源。我們可以用以下方法播放資源文件中的wav聲音:首先,在你的資源文件的源文件(RC)文件加入下面一行:
MySoundWAVEc:musicvanhalen.wav
然後將其編譯為RES文件。最後使用下面的聲明及代碼:
PrivateDeclareFunctionPlaySoundLib_"winmm.dll"Alias"PlaySoundA"(_
ByVallpszNameAsString,_
ByValhModuleAsLong,_
ByValdwFlagsAsLong)AsLong
PrivateConstSND_ASYNC&=&H1
PrivateConstSND_NODEFAULT&=&H2
PrivateConstSND_RESOURCE&=&H40004
DimhInstAsLong
DimsSoundNameAsString
DimlFlagsAsLong
DimlRetAsLong
PrivateSubCommand1_Click()
hInst=App.hInstance
sSoundName="MySound"
lFlags=SND_RESOURCE SND_ASYNC _SND_NODEFAULT
lRet=PlaySound(sSoundName,hInst,lFlags)
EndSub->