锐客网

  1. 首页 > 生活百科 > it技术 > >

vb.net添加背景音乐 vb怎么加背景图

IT技术播放

vb.net中如何播放声音，是要什么控件嘛？My.Computer.Audio.Play("SoundFile.wav")
SoundFile.wav是你要播放的声音文件的路径
VB.net如何加载音效？方法一：调用系统DLL（这个有点不完善，也就是播放声音时窗体无法控制，效果相当于Enabled=true ， 但音频播放完毕后就没事了）
Private Declare Function sndPlaySound Lib "Winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim SoundFile As String, Result As Long
SoundFile = "D:\KuGou\Pianoboy - 第105天.wav" '此处为路径
Result = sndPlaySound(SoundFile, 0)
End Sub
方法二：使用WindowsMediaPlayer（WindowsMediaPlayer1的可见为False）
先添加一个windowsmediaplayer控件（工具箱里没有，需要手动添加）
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WindowsMediaPlayer1.visible=False
Me.WindowsMediaPlayer1.URL = "D:\KuGou\Pianoboy - 第105天.mp3"
End Sub
上面的都是点击button1（按钮1）后播放声音，若是鼠标移动到某控件上发出声音的话改一下触发事件就OK了 。
怎么在vb.net程序里添加背景音乐？推荐到一个人的百度空间里去看，
里面有DirectSound的教程
还有DirectInput、DirectDraw的教程
但是DirectSound只能播放wav
如果想播放像mp3、ogg之类的音乐，你可以使用AudioVideoPlayback
请教一个在vb.net中关于背景音乐的问题.我以前做的时候，是监视背景音乐的播放模式状态的 ， 这样来按照不同的要求进行不同的操作！
怎样给vb.net程序中加背景音乐？简单点?。。?/h2>''''''''''' WAV/wma背景音乐
Public Class Form2
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim a As New Media.SoundPlayer
a.SoundLocation = "c:\windows.wav"
a.PlayLooping()
End Sub
End Class
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
如满意，请采纳，还有不懂的请追问 ， 谢谢 。
【vb.net添加背景音乐 vb怎么加背景图】vb.net添加背景音乐的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb怎么加背景图、vb.net添加背景音乐的信息别忘了在本站进行查找喔 。

    推荐阅读


    上一篇：微服务和go语言，微服务使用go还是java

    下一篇：禁止恋爱游戏大结局视频，禁止恋爱什么意思