VB.net 如何同时播放多个资源文件内的wav

用API mciSendString可以同时播放多个声音，需要提供路径。

创新互联建站，为您提供重庆网站建设、成都网站制作、网站营销推广、网站开发设计，对服务成都餐厅设计等多个行业拥有丰富的网站建设及推广经验。创新互联建站网站建设公司成立于2013年,提供专业网站制作报价服务,我们深知市场的竞争激烈，认真对待每位客户，为客户提供赏心悦目的作品。 与客户共同发展进步，是我们永远的责任！

资源文件很麻烦，要用反射读取出来，再用IO写到磁盘路径。

你是做游戏把？软糖建议是不要使用资源文件，而使用本地文件。

用个BGM文件夹保存背景音乐，用SE文件夹保存音效（学习RPG Maker的做法）

API代码奉上，具体实现模块字数超过最大值，请下载附件

Imports System.Text

''' summary

''' 可播放MPEG,AVI,WAV,MP3,MID,WMA等格式的音频文件,*不支持OGG

''' /summary

Public Class 音频设备

'声明API函数: mciSendString

System.Runtime.InteropServices.DllImport("winmm.dll", EntryPoint:="mciSendString")

Public Shared Function mciSendString(strCommand As String,

strReturn As StringBuilder,

iReturnLength As Integer,

hwndCallback As Integer) As Integer

End Function

'声明API函数: mciGetErrorString

System.Runtime.InteropServices.DllImport("winmm.dll", EntryPoint:="mciSendString")

Public Shared Function mciGetErrorString(errCode As Integer,

errMsg As StringBuilder,

buflen As Integer) As Integer

调用方法

Public Class Form1

Dim 音频设备 As New 音频设备

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim 路径 = "F:\音乐文件名.mp3"

音频设备.打开("自定义名称1", 路径)

音频设备.播放("自定义名称1")

'音频设备.暂停("自定义名称1")

'音频设备.继续("自定义名称1")

'音频设备.关闭("自定义名称1")

End Sub

End Class

如满意，请采纳，还有不懂的请追问，谢谢。

VB.NET 如何播放资源文件里的 wav ？

res 没有实例化应该，你下个断点在Dim bytes(res.Length - 1) As Byte这句，然后看看res是不是为nothing

VB.NET如何调用并播放项目资源内的WAV文件。

代码是没有错的，但是其中关键是声音文件资源定义字串必须使用根命名空间，不能用程序集名称；还有就是声音文件必须选属性为嵌入资源。

My.Computer.Audio.Play(My.Resources.xxxmusic1xxx, AudioPlayMode.Background)

VB.net里面怎么添加音乐

给你个 很简单的

Public Class Form1

Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long

‘ 声明函数 mciexcute 加入库 winmm.all

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Call mciExecute("play E:\music\music\单身情歌.wma ")

'在 formload过程中 调用函数 mciexcute 里面 是 文件 路径

End Sub

End Class

文章标题：vb.net资源文件音乐 vbr音乐
本文地址：http://chengdu.cdxwcx.cn/article/hggoho.html