分享一个在线听书的源码，求怎么自动下一集，求大神不要喷我

hanson1025

在线听书.rar (23.55 KB, 下载次数: 34)

2018-5-23 09:39 上传

点击文件名下载附件
一个简单的在线听书，播放用外部组件 windows媒体播放器，可是怎么也搞不定自动下一集，哪位大大帮忙解决一下，谢谢

芝麻统帅

除了感谢分享就是支持，我支持你，全是些傻逼，真的让你自已去写去创作就变成傻逼了。

hanson1025

芝麻统帅 发表于 2018-5-24 23:24
自动下一集，取文件然后加1

麻烦看下代码，我把自动下一集那里屏蔽了，请问那里是写错了吗？

hanson1025

芝麻统帅 发表于 2018-5-24 23:24
自动下一集，取文件然后加1

  

子程序名	返回值类型	公开	备 注
_播放器1_播放状态被改变
参数名	类 型	参考	可空	数组	备 注
新的状态	整数型

变量名	类 型	静态	数组	备 注
addr	文本型

如果真 (新的状态 ＝ 8)

.版本 2<br /> <br /> .子程序 _播放器1_播放状态被改变<br /> .参数 新的状态, 整数型<br /> .局部变量 addr, 文本型<br /> <br /> .如果真 (新的状态 ＝ 8)

然后在如果真下面写入
索引=索引+1
播放器1.地址 = 高级列表框1.取标题（索引,2）
这样还是播放完毕后，还是停住了，请问是这样写不对吗？

hanson1025

芝麻统帅 发表于 2018-5-24 23:24
自动下一集，取文件然后加1

  

子程序名	返回值类型	公开	备 注
_播放器1_播放状态被改变
参数名	类 型	参考	可空	数组	备 注
新的状态	整数型

变量名	类 型	静态	数组	备 注
addr	文本型

如果真 (新的状态 ＝ 8)

.版本 2<br /> <br /> .子程序 _播放器1_播放状态被改变<br /> .参数 新的状态, 整数型<br /> .局部变量 addr, 文本型<br /> <br /> .如果真 (新的状态 ＝ 8)

然后在如果真下面写入
索引=索引+1
播放器1.地址 = 高级列表框1.取标题（索引,2）
这样还是播放完毕后，还是停住了，请问是这样写不对吗？

hanson1025

芝麻统帅 发表于 2018-5-24 23:24
自动下一集，取文件然后加1

  

子程序名	返回值类型	公开	备 注
_播放器1_播放状态被改变
参数名	类 型	参考	可空	数组	备 注
新的状态	整数型

变量名	类 型	静态	数组	备 注
addr	文本型

如果真 (新的状态 ＝ 8)

.版本 2<br /> <br /> .子程序 _播放器1_播放状态被改变<br /> .参数 新的状态, 整数型<br /> .局部变量 addr, 文本型<br /> <br /> .如果真 (新的状态 ＝ 8)

然后在如果真下面写入
索引=索引+1
播放器1.地址 = 高级列表框1.取标题（索引,2）
这样还是播放完毕后，还是停住了，请问是这样写不对吗？

hanson1025

芝麻统帅 发表于 2018-5-24 23:24
自动下一集，取文件然后加1

  

子程序名	返回值类型	公开	备 注
_播放器1_播放状态被改变
参数名	类 型	参考	可空	数组	备 注
新的状态	整数型

变量名	类 型	静态	数组	备 注
addr	文本型

如果真 (新的状态 ＝ 8)
索引=索引+1
播放器1.地址 = 高级列表框1.取标题（索引,2）

.版本 2<br /> <br /> .子程序 _播放器1_播放状态被改变<br /> .参数 新的状态, 整数型<br /> .局部变量 addr, 文本型<br /> <br /> .如果真 (新的状态 ＝ 8)<br /> 索引=索引+1<br /> 播放器1.地址 = 高级列表框1.取标题（索引,2）

这样还是播放完毕后

hanson1025

芝麻统帅 发表于 2018-5-24 23:24
自动下一集，取文件然后加1

  

子程序名	返回值类型	公开	备 注
_播放器1_播放状态被改变
参数名	类 型	参考	可空	数组	备 注
新的状态	整数型

变量名	类 型	静态	数组	备 注
addr	文本型

如果真 (新的状态 ＝ 8)
索引=索引+1
播放器1.地址 = 高级列表框1.取标题（索引,2）

.版本 2<br /> <br /> .子程序 _播放器1_播放状态被改变<br /> .参数 新的状态, 整数型<br /> .局部变量 addr, 文本型<br /> <br /> .如果真 (新的状态 ＝ 8)<br /> 索引=索引+1<br /> 播放器1.地址 = 高级列表框1.取标题（索引,2）

这样还是播放完毕后,还是直接停住了，请问是这样写不对吗？

hanson1025

芝麻统帅 发表于 2018-5-24 23:24
自动下一集，取文件然后加1

  

子程序名	返回值类型	公开	备 注
_播放器1_播放状态被改变
参数名	类 型	参考	可空	数组	备 注
新的状态	整数型

变量名	类 型	静态	数组	备 注
addr	文本型

如果真 (新的状态 ＝ 8)
索引=索引+1
播放器1.地址 = 高级列表框1.取标题（索引,2）

.版本 2<br /> <br /> .子程序 _播放器1_播放状态被改变<br /> .参数 新的状态, 整数型<br /> .局部变量 addr, 文本型<br /> <br /> .如果真 (新的状态 ＝ 8)<br /> 索引=索引+1<br /> 播放器1.地址 = 高级列表框1.取标题（索引,2）

这样还是播放完毕后，直接就停住了，请问是写得不对吗？

芝麻统帅

自动下一集，取文件然后加1