在VB编程中,如何实现加入声音

144
提问者 pt7r
2018-04-25 13:21 悬赏 66财富值 阅读 1104回答 5

天资少儿编程
登录 后发表回答
其乐无穷74
1楼 · 2018-04-25 13:51.采纳回答

要求:1.在一打开就循环播放,
2.并且这个音乐文件是自己添上,
3.还有就是这个文件和程序是在一起的,不是分开的。

zhaoxk88
2楼-- · 2018-04-25 13:54

可以添加 控件 如Media Player控件
Media Player控件的属性URL 是它要播放文件的地址 比如要放 E:\mp3\we.mp3
WindowsMediaPlayer1.URL = "E:\mp3\we.mp3"
就可以播放了

也有一种机器声音 输入代码 beep 就有“咚”的声音

discovery522
3楼-- · 2018-04-25 13:52

添加一个WindowsMediaPlayer控件放到窗体里,然后写代码:

Private Sub Command1_Click()
WindowsMediaPlayer1.URL = "123.mp3" '这句代码的意思是播放程序所在文件夹中的123.mp3

'URL后面添地址,可以是网址

孤傲92
4楼-- · 2018-04-25 13:51

你可以 OLE 控件 把要的歌曲添进去就 可以文件和程序是在一起的
当启动 OLE 控件 歌曲就会播放

boboboardo9
5楼-- · 2018-04-25 13:40

第一种Private Sub Form_Load()
Set a = CreateObject("wmplayer.ocx")
a.url = "E:\mp3\花好月圆.mp3" '你可在此改成你的乐曲
a.settings.playCount = 99999
End Sub

Private Sub Form_Unload(Cancel As Integer)
a.Controls.stop
a.Close
Set a = Nothing
End Sub

第二种 加个Windows Media Player控件

米粒妈咪 · 问题RSS订阅 · 网站标签 · 最新问题 · 帮助中心 · 合作伙伴
Copy 2018 https://m.milimami.com/ All Rright Reserved. 粤ICP备20017905号-5 / 粤ICP备20017905号-5/ Wxb 举报电话:400-693-8808 / Zggsrz