龙盟编程博客 | 无障碍搜索 | 云盘搜索神器
快速搜索
主页 > 软件开发 > VB开发 >

利用API函数播放Wav声音文件

时间:2009-12-30 15:42来源:未知 作者:admin 点击:
分享到:
PrivateDeclareFunctionsndPlaySoundLib"Winmm.dll"Alias"sndPlaySoundA"(ByVallpszSoundNameAsString,ByValuFlagsAsLong)AsLong
  
  PrivateSubCmdplay_Click()
  DimSoundFileAsString,ResultAsLong
  SoundFile="C:Pwin98MediaTheMicrosoftSound.WAV"
  Result=sndPlaySound(SoundFile,1)
  EndSub->

精彩图集

赞助商链接