[求助]紧急求教,高手快来帮忙指点!
请问采用MMControl控件编制音乐类播放文件时，如果才能自动播放下一首歌？到最后一首又如何自动循环到第一首歌？（已建立了列表框，取名Lista）
2007-03-11 19:54
2007-03-14 14:59
2007-03-14 17:24
2007-03-14 17:50
我已经试过啦!
'---自动向下播放的算法
Dim toc As Variant
toc = ListA.ListCount - 1
If toc = ListA.ListCount Then
Exit Sub
Else
ListA.ListCount = ListA.ListCount + 1
MMContA.filename = ListA.Text
MMContA.Command = "play"
这样可以继续下一首,但播放完第二首歌就出错,那位高手来帮忙看看代码错在那里
2007-03-15 15:01
2007-03-15 16:07
