vb.net播放音乐 vb6播放音频文件

vb.net中编辑音乐播放器用什么控件添加音乐

需要用到COM控件，例如media player、Real player等，或者用 .NET 自带的类库 System.Media下面的 SoundPlayer来播放音乐

相关问答

Q1: vb.net怎么播放音乐文件

添加一个 WindowsMediaPlayer 控件 一句代码即可播放音乐 AxWindowsMediaPlayer1.URL = "音乐地址"

Q2: VB.NET中播放背景音乐最简单的办法是什么啊?

给你我的程序，自己研究一下吧，我也不是很明白。

Public Class Form1

Private Declare Auto Function PlaySound Lib "winmm.dll" (ByVal lpszSoundName As String, ByVal hModule As Integer, ByVal dwFlags As Integer) As Integer

Const SND_filename As Integer = H20000

Const SND_alias As Integer = H10000

Const SND_sync As Integer = H0

Declare Auto Function waveOutGetNumDevs Lib "winmm.dll" Alias "waveOutGetNumDevs" () As Integer

Declare Auto Function sndPlaySound Lib "winmm.dll" (ByVal filename As String, ByVal options As Integer) As Integer

Private Const SND_memory As Integer = H4

Private Const SND_async As Integer = H1

Private Const proess_domain As String = ""

Const SND_sync1 = H0

Const SND_async1 = H1

Const SND_nodefault = H2

Const SND_loop = H8

Const SND_nostop = H10

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

Beep()

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim strFileName As String = "start.wav"

PlaySound(strFileName, 0, SND_filename)

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

PlaySound("systemstart", 0, SND_alias Or SND_sync)

End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

Dim ret As Long

Dim strfilename As String

strfilename = "start.wav"

ret = sndPlaySound(strfilename.ToCharArray, 0)

End Sub

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click

Dim i As Integer

i = waveOutGetNumDevs()

If i 0 Then

MsgBox("可以播放声音", 64, "检测")

Else

MsgBox("不能播放声音", 64, "检测")

End If

End Sub

End Class

Q3: 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

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

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

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

vb.net播放音乐的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb6播放音频文件、vb.net播放音乐的信息别忘了在本站进行查找喔。