怎么让VB里放歌?

发布网友 发布时间:2022-04-25 04:51

我来回答

3个回答

热心网友 时间:2023-10-27 05:40

先定义~
Declare Function mciExecute Lib "winmm.dll" (ByVal commandstring As String) As Long

再引用~
dim temp as long
temp=mciexecute("play XXXXX")
'其中XXXXX为你歌所在路径。
不过这样不太方便,歌只能一直播。
可以向上面说的,加入MMControl控件。

热心网友 时间:2023-10-27 05:41

加入MMControl控件,
MMC.FileName = App.Path + "\water.mp3"
MMC.Command = "Open"
MMC.Command = "Play"

热心网友 时间:2023-10-27 05:41

就是添加文件 如果是要选择的话就在建个新的连接添加到里面就行了

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com