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中编辑音乐播放器用什么控件添加音乐需要用到COM控件,例如media player、Real player等,或者用 .NET 自带的类库 System.Media下面的 SoundPlayer来播放音乐
如何在VB.NET中调用MP3播放器【vb.net音乐播放控件 winform播放音乐代码】工具栏里选择"添加,删除组件"
选择com组件
选择"Windows Media Player "
然后在界面上加入这个组件
代码
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) _
Handles Button1.Click
Const DATA_FILE_EXTENSION As String = ".mp3"
Dim dlgFileDialog As New OpenFileDialog
With dlgFileDialog
.Filter = DATA_FILE_EXTENSION_
" files (*"DATA_FILE_EXTENSION"|*"DATA_FILE_EXTENSION
.FilterIndex = 1
.RestoreDirectory = True
If .ShowDialog() = DialogResult.OK Then
'Play the sound file
Me.AxWindowsMediaPlayer1.URL = dlgFileDialog.FileName
End If
End With
End Sub
参考资料中可以看到很详细vb.net音乐播放控件的步骤
vb的声音播放控件是什么?是啊,顶楼上 。WMP是每台windows系统电脑必须安装的 。
===WindowsMediaPlayer的常用属性和方法===
基本属性:数据类型
URL:string可以指定媒体位置
enableContextMenu:Boolean显示/不显示播放位置的右键菜单
fullScreen:boolean全屏显示
stretchToFit:boolean非全屏状态时是否伸展到最佳大小
uMode:string播放器的模式,full:有下面的控制条; none:只有播放部份没有控制条
playState:integer当前控件状态,下面是三种基本状态: 3:正在播放 2:暂停 1:已停止
If WMP.playState = wmppsUndefined Then MsgBox "音乐文件未找到,是否现在修改配置?"
状态变化时会触发OnStatusChange事件
Controls控制
可通过WindowsMediaPlayer.controls对播放器进行控制并取得相关的一些信息:
controls.play;播放
controls.stop;停止
controls.pause;暂停
controls.currentPosition:Double 当前播放进度
controls.currentPositionString:string 时间格式的字符串 "0:32"
currentMedia媒体信息
可以通过WindowsMediaPlayer.currentMedia取得当前媒体的信息
currentMedia.durationDouble 总长度
currentMedia.durationString 时间格式的字符串 "4:34"
settings设置
可以通过WindowsMediaPlayer.settings对播放器进行设置,包括音量和声道等 。
settings.volume:integer 音量 (0-100)
settings.balance:integer 声道,通过它应该可以进行立体声、左声道、右声道的控制 。
版本2:
基本属性:数据类型
URL:String; 指定媒体位置,本机或网络地址
uiMode:String; 播放器界面模式,可为Full, Mini, None, Invisible
playState:integer; 播放状态,1=停止 , 2=暂停,3=播放,6=正在缓冲,9=正在连接 , 10=准备就绪
enableContextMenu:Boolean; 启用/禁用右键菜单
fullScreen:boolean; 是否全屏显示
[controls] wmp.controls //播放器基本控制
controls.play; 播放
controls.pause; 暂停
controls.stop; 停止
controls.currentPosition:double; 当前进度
controls.currentPositionString:string; 当前进度,字符串格式 。如“00:23”
controls.fastForward; 快进
推荐阅读
- 图片直播的拍摄技巧,照片直播
- 买的显卡开不了机怎么回事,新装的显卡开不了机
- 瑞巨显卡怎么样,瑞炬显卡是独显吗
- sqlserver2008r2是什么版本,sqlserver2008版本区别
- endgo汇编语言 在汇编语言源程序文件中,end语句后的语句会被汇编吗
- js中.和中括号的区别,大括号和中括号的区别
- 赛车游戏名苹果手机版下载,ios赛车游戏2020
- 2d太空射击游戏,太空射击游戏unity
- go语言粘包解决方案 go语言dll