vb添加背景音乐

『壹』 为VB程序添加背景音乐

播放背景音乐

声明：

Declare Function MCISendString& Lib -MMSYSTEM- (ByVal LPSTRCOMMAND

$, ByVal LPSTRRETURNSTR As Any, ByVal WRETURNLEN%, ByVal HCALLBACK%)

开始播放：

R% = MCISendString&(-OPEN EXAMPLE.MID TYPE SEQUENCER ALIAS NN-, 0&,

0, 0)

R% = MCISendString&(-PLAY NN FROM 0-, 0&, 0, 0)

R% = MCISendString&(-CLOSE ANIMATION-, 0&, 0, 0)

停止：

R% = MCISendString&(-OPEN EXAMPLE.MID TYPE SEQUENCER ALIAS NN-, 0&,

0, 0)

R% = MCISendString&(-STOP NN-, 0&, 0, 0)

R% = MCISendString&(-CLOSE ANIMATION-, 0&, 0, 0)

其中EXAMPLE.MID 为播放的文件，NN为自定义名称标志。

『贰』 在VB里怎么加背景音乐

1、直接进入VB的相关窗口，选择标准EXE打开。

『叁』 VB登录界面如何添加背景音乐

你在url设置之后 加一句a.controls.play 如果还不能播放 你换个文件 及其文内件路径 还可以先添加media控件 而不是动态添容加

第二个你image控件事件下面的代码需要放到所有代码之上

『肆』 vb程序中怎么添加背景音乐

把音乐mp3文件和exe文件放在同一个目录下，假设是1.mp3，加入如下代码设置音乐文件路径：
WindowsMediaPlayer1.URL = App.Path & "\1.mp3"
即可解决问题，不过音乐文件要和exe在一起。
如果要做到只有exe文件还可以使用资源文件的方式，程序运行的时候释放资源。

『伍』 vb中如何添加背景音乐

添加一个播放器控件，visible属性设置不可见就行了

『陆』 VB如何为程序添加背景音乐

外接程序管理器是vb6.0的东西，你这个是vb.net，不是vb6.0.所以是不能使用外接程序管专理器的。你可以把音乐属放在资源的文件夹里，和程序一起编译。这样就不用调用外部文件了。具体的代码的话，我可以写好编译好发给你。

『柒』 vb中如何添加背景音乐

是用windowmediaplayer空间
在工程——部件里面找到
应该在最下面
方法使用
windowmediaplayer1.url="e:\mp3\1.mp3"
放到form_load事件里面
拖进一个Windows
Media
Player控件,
设置其Visible属性为False
然后在Form_Load中用Windows
Media
Player加载你的背景音乐播放就OK了.

『捌』 怎么在VB中添加背景音乐

WindowsMediaPlayer1.Controls.play'播放
WindowsMediaPlayer1.Controls.stop'停止
WindowsMediaPlayer1.Controls.pause'暂停
你这样连续让它播放\停止\暂停,它最后就是停止了,当然没有声音啦
Private Sub WindowsMediaPlayer1_OpenStateChange(ByVal NewState As Long)
WindowsMediaPlayer1.URL = "e:\wj\j.mp3"
WindowsMediaPlayer1.Controls.play
End Sub
就可以了

『玖』 VB如何添加背景音乐

我倒有一个办法，就是吧你需要的音乐文件写到资源文件里面去，在需要播放的时候再生成出来，然后播放，可以达到嵌入EXE的目的

『拾』 如何在vb中插入背景音乐且在其他电脑中可放

使用资源文件，可以直接在在exe文件中播放声音文件（wav文件），使程序显得更加专业。
⑴启动
vb6.0，在“外接程序→外接程序管理器”中加载“visual
basic
6
资源编辑器”
⑵在
vb
资源编辑器窗口中，点击“添加自定义资料”，增加任意的
wav
文件，再双击刚刚创建的自定义资源，弹出”编辑属性”窗口，定义如下：
类型：
"wave"
标识号：
102
语言：
中文（中国）
⑶保存资源文件，写如下代码：
option
explicit
private
declare
function
getsystemdefaultlcid
lib
"kernel32"
()
as
long
private
declare
function
sndplaysoundfrommemory
lib
"winmm.dll"
alias
"sndplaysounda"
(lpszsoundname
as
any,
byval
uflags
as
long)
as
long
public
const
snd_async
=
&h1&
public
const
snd_memory
=
&h4&
private
sub
command5_click()
注释：播放
wav
文件
dim
barr()
as
byte
barr
=
loadresdata(102,
"wave")
sndplaysoundfrommemory
barr(0),
snd_async
or
snd_memory
end
sub
⑷按
f5
运行本程序，点击
command
按钮，就可以听到你选定的
wav
文件的声音了。