Ⅰ 在vb中加入一个音乐播放器
第一：如果你仅仅是想播放WAV这样的背景音乐的话，可以使用API函数，不用添加控件，这样可以减少系统资源，方法如下：
在通用中声明：
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hMole As Long, ByVal dwFlags As Long) As Long
接着在form 的 load 事件中写如下代码：
Call PlaySound(App.Path + "音乐名字.wav", 0&, &H1)//必须在当前文件夹下
第二：添加Windows Media Player 控件
把Windows Media Player 控件visible 属性设置为false
url 属性设置为 音乐文件的绝对路径并且加上音乐文件名字
或者在load 事件中设置此属性
第三：添加 real player 控件
visible 属性设置为 false
注意，此时设置的是 source 属性为音乐文件而不是url属性
第四：microsoft multimedia control 6.0控件
设置相关属性
Ⅱ 用vb怎样制作音乐播放器啊
好的，我们的教程现在开始——————
这个是我已经做好了的窗体，来看一下，这个应该熟悉吧？就是windows media player 它是怎么添加的呢？呵呵，其实很简单的哦，认真看我的操作，选中这个，因为我已经选择好了，有这个是不行的，还要添加一个空间，那就是commondialog，它的添加给media player一样的，Microsoft Common Dialog Control 6.0 选中这个就行了，它对应的图标是这个————看我鼠标。把这个两个再添加到窗体上就可以了。
然后就是写代码，我想你是想做个播放器吧？呵呵，我就把代码顺便给你写了出来....下面看代码
'代码开始————————————————————
Private Sub Command1_Click()
CommonDialog1.Action = 1
WindowsMediaPlayer1.URL = CommonDialog1.FileName
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
Private Sub Form_Load()
Form1.Caption = "影音播放器"
Command1.Caption = "打开"
Command2.Caption = "退出"
End Sub
_________________________________________________
这个就是代码了，下面我们运行一下看能不能运行啊...期待中ing...o(∩_∩)o...貌似可以哦，^_^
:-)，看到没，一个播放器做成了！！！怎么样？有点成就感吧？当然要做好一个播放器不只是这么简单的哦，还需要继续努力！好了，教程到此结束.我这个支持你选择播放的！！！
以上程序在xp下测试通过！
Ⅲ 请高手指教,在vb.net中，如何编写一个最简单的音乐播放器
值得参考（从功能和外观上都不错内）容：
http://hi..com/lml%C7%E5%B7%E7%C2%E4%D2%B6/blog/item/21b92402ef718ad77a89475a.html
http://hi..com/lml%C7%E5%B7%E7%C2%E4%D2%B6/blog/item/518360eaaddcb3f7ce1b3eaf.html
Ⅳ 如何用VB编写一个音乐播放器
添加一个 WindowsMediaPlayer，一个CommonDialog，一个list ，一个command
Dim pa As String
Private Sub Command1_Click()
Dim song As String
With CommonDialog1
.FileName = ""
.Filter = "*.mp3|*.mp3;*.avi;*.mid"
.Flags = 512
.ShowOpen
song = .FileName
End With
If song = "" Then Exit Sub
a = ""
For i = Len(song) To 1 Step -1
k = Mid(song, i, 1)
If k = " " Then '多首歌的分隔符
List1.AddItem a
a = ""
ElseIf k = "\" Then '一首歌时歌名与路径的分隔符
List1.AddItem a
pa = Left(song, i)
Exit Sub
Else
a = k & a
End If
Next i
End Sub
Private Sub List1_DblClick()
Me.Caption = "我的播放器 当前播放" & pa & List1.Text
WindowsMediaPlayer1.URL = pa & List1.Text
End Sub
Ⅳ vb制作音乐播放器
1.如何加载WindowsMediaPlayer，控件：
在VB6.0D的菜单栏找到“工程”——“部件”，在弹出的菜单中，拉动滚动条找到WindowsMediaPlayer，将其前面的复选框选中，点击“应用”“确定”即可，然后你就会在你的的控件栏中看到WindowsMediaPlayer控件了。
2.如何播放音乐文件
只需要将WindowsMediaPlayer1.URL赋相应的值即可。
例如要在窗体加载时播放music.mp3这个文件，只要这样写代码。
Private Sub Form_Load()
WindowsMediaPlayer1.URL = VB.App.Path & "\music.mp3"
End Sub
注意：其中的\music.mp3是一个相对路径表示当前目录下的文件，即你的工程所保存的位置。
3.如何暂停播放
在command按钮中加入如下代码，即可实现。
Private Sub Command4_Click()
WindowsMediaPlayer1.Controls.pause
End Sub
4.如何在暂停播放之后继续播放
在command按钮中加入如下代码，即可实现。
Private Sub Command3_Click()
WindowsMediaPlayer1.Controls.play
End Sub
如果想实现音乐从头播放，只需要将第二条中播放音乐中代码再写一遍即可。
Private Sub Command5_Click()
WindowsMediaPlayer1.URL = VB.App.Path & "\music.mp3"
End Sub
5.停止播放的音乐（关闭播放器）
在command按钮中加入如下代码，即可实现。
Private Sub Command1_Click()
WindowsMediaPlayer1.Close
End Sub
Ⅵ 用VB做个音乐播放器
工程-->部件-->浏览-->选择msdxm.ocx加载
然后在窗体设计器中创建一个MediaPlayer控件，名字不用改，不过注意如果专名字不是属MediaPlayer1就说明该控件版本和我不一样，代码也就不能用了。
接着在Form_load事件中加入代码：
MediaPlayer1.AutoStart = False '让播放器不自动播放
MediaPlayer1.FileName = "C:\123.mp3" '载入C:\123.mp3
MediaPlayer1.Play '播放
当然事先要在C盘放一个123.mp3
暂停和停止功能，MediaPlayer控件自带。
虽然功能很少但是至少可以实现mp3播放，如果你有不懂的地方，我可以继续为你解答。
Ⅶ 怎样用VB制作一个音乐播放器
你到vb吧 点吧内搜索！~
有源代码的！~
Ⅷ vb制作音乐播放器。怎么办
1.怎么加载WindowsMediaPlayer，控件：
在VB6.0D的菜单栏找到“工程”——“部件”，在弹出的菜单中，拉动滚动条找到WindowsMediaPlayer，将其前面的复选框选中，点击“应用”“确定”即可，之后你就会在你的的控件栏中看见WindowsMediaPlayer控件了。
2.怎么播放音乐(music)文件
只需要将WindowsMediaPlayer1.URL赋相应的值即可。
例如要在窗体加载时播放music.mp3这个文件，只需要这样写代码。
Private
Sub
Form_Load()
WindowsMediaPlayer1.URL
=
VB.App.Path
&
"\music.mp3"
End
Sub
注意：其中的\music.mp3是1个相对路径表示当前目录下的文件，即你的工程所保存的位置。
3.怎么暂停播放
在command按钮中加入如下代码，即可实现。
Private
Sub
Command4_Click()
WindowsMediaPlayer1.Controls.pause
End
Sub
4.怎么在暂停播放之后继续播放
在command按钮中加入如下代码，即可实现。
Private
Sub
Command3_Click()
WindowsMediaPlayer1.Controls.play
End
Sub
假如想实现音乐(music)从头播放，只需要将第二条中播放音乐(music)中代码再写一遍即可。
Private
Sub
Command5_Click()
WindowsMediaPlayer1.URL
=
VB.App.Path
&
"\music.mp3"
End
Sub
5.停止播放的音乐(music)（关掉播放器）
在command按钮中加入如下代码，即可实现。
Private
Sub
Command1_Click()
WindowsMediaPlayer1.Close
End
Sub
Ⅸ VB音乐播放器怎么做
先添加windows
mediaplayer控件，然后在他的自定义属性里设置你下载的歌曲地址，运行就可以播放了。
Ⅹ VB怎么做音乐播放器
工具面板并在部件添加窗口里选择“Windows MediaPlayer”来添加这个控件
控件具体用法参考专http://wenku..com/link?url=_Em67cES0sdP7vkvarrOMSonsCv-2B0nlG2N8dsKJoDgPfWvy_3zLzfJzUxPZGa-NWucgiQG
我就不复制了属