关于mp3player.ocx控件

Question

在VB6.0   下编了一个MP3播放程序。   
  用的是mp3player.ocx控件。但播放时间长了以后（2，3个小时以后），   
  会弹出runtime   error出错消息框，然后整个程序就被关闭。   
  请问该如何解决？ 在定时器中关于MP3PLAY控件只加了，MP3PLAY1.OPEN 和 MP3PLAY1.PLAY 两条语句

Answer 1

只能说明这个控件没有设计好～换msdxm.ocx试试吧

Answer 2

运行时错误的内容是什么?不会是只有runtime  error吧,播放时间2，3个小时以后才出问题,不一定是控件的问题!  

Answer 3

能播放mp3的控件很多，再换一个好用的，如MMControl(MCI32.ocx)

Answer 4

干嘛不用Windows系统的？很好用啊。

Answer 5

屏蔽了定时器中以下程序后，运行一段时间后测试没有出现runtime  error 程序终止的问题。Dim retcode As Integer
Dim temstring As String
If List1.ListCount > 0 Then  '检查队列是否为空
    For i = 0 To List1.ListCount - 1 ' 不能循环播放，在播放时间间隔内播完，才能播放下一首        temstring = List1.LIST(0)
        '取出第一条报警信息
         List1.RemoveItem (0)
        '将该条移出报警信息队列
        On Error GoTo error_handle
        retcode = Mp3Play1.Open(App.Path + "\" + temstring + ".mp3", "")
        retcode = Mp3Play1.Play '播放语音报警     Exit Sub
error_handle:                     '错误处理
     retcode = Error
     soundable = True
   Resume Next
    Next i
End If

Answer 6

我以前也用mp3player.ocx，试试一楼和四楼的

Answer 7

换了系统自带的MMCONTROL问题解决了