精益模块 音乐_播放无法播放

Porsche

如图代码，返回假

淘淘淘淘淘淘

来，试过了，文件地址不能取运行目录，需要提供完整路径就可以了，你试一下把，结果2为假，结果为真

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
结果	逻辑型
结果2	逻辑型

结果2 ＝ 音乐_播放 (取运行目录 () ＋ “\口罩.mp3”, “002”, , )
结果 ＝ 音乐_播放 (“E:\EDemo\口罩.mp3”, “001”, , )
调试输出 (“结果2：” ＋ 到文本 (结果2))
调试输出 (“结果：” ＋ 到文本 (结果))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 结果, 逻辑型<br /> .局部变量 结果2, 逻辑型<br /> <br /> 结果2 ＝ 音乐_播放 (取运行目录 () ＋ “\口罩.mp3”, “002”, , )<br /> 结果 ＝ 音乐_播放 (“E:\EDemo\口罩.mp3”, “001”, , )<br /> 调试输出 (“结果2：” ＋ 到文本 (结果2))<br /> 调试输出 (“结果：” ＋ 到文本 (结果))

D:\桌面\01.png

Suky

先确认一下   mp3文件格式是否与其后缀名一致的
音频格式转换不是直接自己改后缀名就可以的
建议随便网上下载一首mp3试试
或者检查一下音频文件大小，看是否文件过大导致异常

Suky

  

子程序名	返回值类型	公开	备 注
音乐_播放	逻辑型		真=播放成功,假=播放失败。可用于同时播放多首音乐，只要标识不同
参数名	类 型	参考	可空	数组	备 注
文件名	文本型				支持格式:mp3,wav,其他格式没有测试..也可以是网络地址
标识	文本型				不可以含有空格，用于标识播放了哪个歌曲,可用来控制该音乐。比如:mysong
是否等待播放完毕	逻辑型				默认为假，不等待播放完毕直接返回，如果为真，则等待播放完毕后才会返回。
是否重新开始	逻辑型				默认为假

如果真 (是否重新开始)
mciSendStringA (“close ” ＋ 标识, “0”, 0, 0)
mciSendStringA (“open ” ＋ #引号 ＋ 文件名 ＋ #引号 ＋ “ alias ” ＋ 标识, “0”, 0, 0)
返回 (mciSendStringA (“play ” ＋ 标识 ＋ 选择 (是否等待播放完毕 ＝ 真, “ wait”, “”), “0”, 0, 0) ＝ 0)

.版本 2<br /> <br /> .子程序 音乐_播放, 逻辑型, 公开, 真=播放成功,假=播放失败。可用于同时播放多首音乐，只要标识不同<br /> .参数 文件名, 文本型, , 支持格式:mp3,wav,其他格式没有测试..也可以是网络地址<br /> .参数 标识, 文本型, , 不可以含有空格，用于标识播放了哪个歌曲,可用来控制该音乐。比如:mysong<br /> .参数 是否等待播放完毕, 逻辑型, 可空, 默认为假，不等待播放完毕直接返回，如果为真，则等待播放完毕后才会返回。<br /> .参数 是否重新开始, 逻辑型, 可空, 默认为假<br /> <br /> .如果真 (是否重新开始)<br />     mciSendStringA (“close ” ＋ 标识, “0”, 0, 0)<br /> .如果真结束<br /> mciSendStringA (“open ” ＋ #引号 ＋ 文件名 ＋ #引号 ＋ “ alias ” ＋ 标识, “0”, 0, 0)<br /> 返回 (mciSendStringA (“play ” ＋ 标识 ＋ 选择 (是否等待播放完毕 ＝ 真, “ wait”, “”), “0”, 0, 0) ＝ 0)

  

DLL命令名	返回值类型	公开	备 注
mciSendStringA	整数型		播放音乐文件
DLL库文件名:
winmm.dll
在DLL库中对应命令名:
mciSendStringA
参数名	类 型	传址	数组	备 注
lpstrCommand	文本型
lpstrRetumString	文本型
uReturnLength	整数型
hwndCallback	整数型

.版本 2<br /> <br /> .DLL命令 mciSendStringA, 整数型, "winmm.dll", "mciSendStringA", , 播放音乐文件<br />     .参数 lpstrCommand, 文本型<br />     .参数 lpstrRetumString, 文本型<br />     .参数 uReturnLength, 整数型<br />     .参数 hwndCallback, 整数型

命令调用的dll，检查一下是否存在、版本是否兼容

知足常

估计是你的文件并非是MP3格式的吧。要不然不会放不出来的

oathyun

5555555555555