vb.net重复播放 vbs重复弹窗

提示：扫一扫查出行
【扫一扫了解最新限行尾号】
复制提示

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

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

资源文件很麻烦，要用反射读取出来，再用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

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

相关问答

Q1: vb.net 如何防止程序重复运行？谢谢了，大神帮忙啊

现在多是在form_load里验证的,你打开第二次也只是暂时的,后面让vb.net重复播放他关闭就行vb.net重复播放了. form_load之前windows form就已经生成... 把你程序读入内存就算这个程序已经被打开开始执行了...不管你放那里都是会打开第二次的... 要让vb.net重复播放他结束直接用Application.Exit()就行了.

Q2: 怎什样用VB,NET音乐连续播放呢？

找1986年3月3日生的人

谁和vb.net重复播放我是同年同月同日、出生的

加vb.net重复播放我QQ183746999

Q3: vb.net怎样才能在程序运行时一直重复执行一个子函数而不影响程序运行

首先这个要看的子函数执行的情况了，比如你子函数要8秒才能执行完成，你1秒钟执行一次，到时会有好几个子函数在运行，肯定会影响程序运行的。你要调整时间才能让子函数不影响主程序；

再一个，如果不想影响主程序，你可以再建一个程序，专门用来执行子函数，然后让那个程序用定时器每秒执行一次子函数，这样就不会影响主程序；

Q4: vb.net中如何播放声音，是要什么控件嘛？

My.Computer.Audio.Play("SoundFile.wav")

SoundFile.wav是你要播放的声音文件的路径

Q5: VB.NET中如何循环播放多个视频文件

关键在于“播放结束”事情的捕捉vb.net重复播放，播完后捕捉到该事件vb.net重复播放，然后就可以播下一个vb.net重复播放了。