Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Проигрывание MP3 Добавлено: 12.09.02 22:47  

Автор вопроса:  Mister U | Web-сайт: stihi.h12.ru | ICQ: 809526 

Я в своих программах использую элемент WindowsMedia для проигрывания MP3, WAVE, MIDI и т.д...

На форме есть лист бокс и windowsmedia

Как определить конец первой песни из листбокса и автоматически переключиться на вторую?

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 Satrapp



ICQ: 75556561 

Вопросов: 8
Ответов: 80
 Профиль | | #1 Добавлено: 13.09.02 01:30

Используй End Of Stream


Private Sub MediaPlayer1_EndOfStream(ByVal Result As Long)
        If lstПесня.ListIndex = lstПесня.ListCount - 1 Then
            lstПесня.ListIndex = 0
        Else
            lstПесня.ListIndex = lstПесня.ListIndex + 1
        End If
        Call lstПесня_Click
End Sub

Далее, в зависимости от того, что у тебя в лист-боксе, обрабатываешь lstПесня_Click()... Я так думаю!:-) Если есть свои особенности, пиши...

Ответить

Номер ответа: 2
Автор ответа:
 Satrapp



ICQ: 75556561 

Вопросов: 8
Ответов: 80
 Профиль | | #2 Добавлено: 13.09.02 01:31

Используй End Of Stream


Private Sub MediaPlayer1_EndOfStream(ByVal Result As Long)
        If lstПесня.ListIndex = lstПесня.ListCount - 1 Then
            lstПесня.ListIndex = 0
        Else
            lstПесня.ListIndex = lstПесня.ListIndex + 1
        End If
        Call lstПесня_Click
End Sub

Далее, в зависимости от того, что у тебя в лист-боксе, обрабатываешь lstПесня_Click()... Я так думаю!:-) Если есть свои особенности, пиши...

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам