一个简易的音乐播放器播放完音乐怎么让按钮变回播放呢？

一切皆浮云

本人今天才学习，不昨天开始学的，由于学问不高，就有出现问题了，一个简易的音乐播放器播放完音乐怎么让按钮变回播放呢？这是我编的第一个小软件，我想把它弄好当纪念，求哪位大神帮帮忙 ..................（虽然我写的很乱，我想大神们能看懂吧）  我就坐等大神了

寒嗳冰

写错一个数字

一切皆浮云

{:3_234:}坐等大神啊

寒嗳冰

在你的时钟里面加上一句话就可以了

补充内容 (2012-2-14 00:45):
不好意思，写错了，把-1改成0

一切皆浮云

测试中...........

一切皆浮云

JB  已经给个了  谢谢了噢

千年

test.zip (37.29 KB, 下载次数: 40)

2012-2-14 01:05 上传

点击文件名下载附件

给你修改了一下，还有另外自己老早以前弄的一个源码。

一切皆浮云

在弱弱的问一下怎么才能让编辑框显示的只是歌名不显示路径啊

千年

一切皆浮云 发表于 2012-2-14 01:06
在弱弱的问一下怎么才能让编辑框显示的只是歌名不显示路径啊

1. .版本 2
   
2. .支持库 spec
   
3. 
   
4. .子程序 _按钮1_被单击
   
5. .局部变量 text, 文本型
   
6. 
   
7. text ＝ 取文本右边 (编辑框1.内容, 取文本长度 (编辑框1.内容) － 倒找文本 (编辑框1.内容, “\”, , 假))
   
8. 调试输出 (text)
   
9. 
   

复制代码

上面是取到文件名，但是你播放的时候，必须是绝对路径，否则不能播放
也就是说，你要这么做

1. .版本 2
   
2. 
   
3. .子程序 _按钮1_被单击
   
4. .局部变量 text, 文本型
   
5. 
   
6. .如果 (通用对话框1.打开 ())
   
7.     路径名 ＝ 通用对话框1.文件名
   
8.     text ＝ 取文本右边 (路径名, 取文本长度 (路径名) － 倒找文本 (路径名, “\”, , 假))
   
9.     编辑框1.内容 ＝ text
   
10.     同步播放MP3 (路径名, 滑块条1.位置, 标签_播放状态反馈, )
    
11.     按钮2.标题 ＝ “暂停”
    
12. .否则
    
13. 
    
14. .如果结束
    
15. 
    

复制代码

按照我发那个源码，你要吧 下面播放的，都弄成路径名，而路径名是要程序集变量才行

寒嗳冰

一切皆浮云 发表于 2012-2-14 01:06
在弱弱的问一下怎么才能让编辑框显示的只是歌名不显示路径啊

设置一个变量，把全部地址+文件名给它，然后可以用分割文本  用“\”来分割刚才那个文本，把最后一个分割得到的文本给编辑框就行了，如果不会，明天起来给你写代码，推荐世宝老师的视频教程，对初学者来说，我认为很适合