Проигрывание музыки поочередно

@Кот Борис · Регистрация: 09.05.2019

Author24 — интернет-сервис помощи студентам

Visual Basic

i = 0
        If i = 0 Then
            AxWindowsMediaPlayer1.URL = "C:\Users\Public\Documents\OutMPlayer\Music\///.mp3"
            Label2.Text = 47
            Timer1.Start() : i = 1
        End If
 
 
        If i = 1 Then
            AxWindowsMediaPlayer1.URL = "C:\Users\Public\Documents\OutMPlayer\Music\***.mp3"
            Label2.Text = 30
            Timer1.Start()
        End If

Вот есть такой вот код, который должен после конца отыгровки первой мелодии должна запускаться вторая, но вопрос: "какого х..?". Но получается, что играет только последняя мелодия по этому списку (даже если их будет больше, то только последняя будет играть). Как исправить этот бред, помогите, будьтеж людьми.

@andrsh · 15.09.2019, 21:26

VB.NET

If i = 0 Then
            AxWindowsMediaPlayer1.URL = "C:\Users\Public\Documents\OutMPlayer\Music\///.mp3"
            Label2.Text = 47
            Timer1.Start() : i = 1
         ElseIf i = 1 Then
             AxWindowsMediaPlayer1.URL = "C:\Users\Public\Documents\OutMPlayer\Music\***.mp3"
            Label2.Text = 30
            Timer1.Start()
        End If

@A_Qz · 15.09.2019, 21:45

Ну и как, Котик, сейчас играет?

@andrsh · 15.09.2019, 21:48

VB.NET

1	ElseIf i = 1 Then

При таком условии работает нормально. а как у него нет.

@Кот Борис · 16.09.2019, 08:33 **[ТС]**

Да, работает, но чтобы вторая начала играть приходится опять нажимать на кнопку, а надо чтобы все по очереди сыграли))

Uswer · 16.09.2019, 09:28

Кот Борис, чтобы понять почему у Вас не работает так, как Вы хотите приведённого куска кода явно не достаточно, покажите всю процедуру воспроизведения.

SoftIce · 16.09.2019, 09:35

Кот Борис, создайте список воспроизведения, и будет вам счастье.

@Кот Борис · 16.09.2019, 12:21 **[ТС]**

Если б я знал как, то этой темы бы тут не было

SoftIce · 16.09.2019, 12:36

Сообщение от Кот Борис

Если б я знал как

Как сделать список воспроизведения ?

Добавлено через 9 минут
Примерно так. Код в кнопку.

VB.NET

Dim playList = AxWindowsMediaPlayer1.newPlaylist("Мой плейлист", "")
playList.appendItem(AxWindowsMediaPlayer1.newMedia("C:\Users\Public\Documents\OutMPlayer\Music\11111mp3"))
playList.appendItem(AxWindowsMediaPlayer1.newMedia("C:\Users\Public\Documents\OutMPlayer\Music\22222.mp3"))
AxWindowsMediaPlayer1.currentPlaylist = playList
AxWindowsMediaPlayer1.Ctlcontrols.play()

@Кот Борис · 16.09.2019, 13:01 **[ТС]**

Тут уже по сути немного другая проблемка, что таймера обратного отсчёта нету, но спасибо

@MrCrown · 16.09.2019, 13:21

Сообщение от Кот Борис

таймера обратного отсчёта нету

Кот Борис, для чего?

@Кот Борис · 16.09.2019, 14:58 **[ТС]**

Чтобы знать, сколько осталось. В первом коде он есть, но ладно

@Кот Борис 0 / 0 / 0 Регистрация: 09.05.2019 Сообщений: 46
	16.09.2019, 13:01 [ТС]	10
	Тут уже по сути немного другая проблемка, что таймера обратного отсчёта нету, но спасибо 0

@A_Qz 31 / 8 / 4 Регистрация: 21.01.2018 Сообщений: 54
	15.09.2019, 21:45	3
	Ну и как, Котик, сейчас играет? 0

@Кот Борис 0 / 0 / 0 Регистрация: 09.05.2019 Сообщений: 46
	16.09.2019, 08:33 [ТС]	5
	Да, работает, но чтобы вторая начала играть приходится опять нажимать на кнопку, а надо чтобы все по очереди сыграли)) 0

Uswer 1978 / 1411 / 366 Регистрация: 26.06.2017 Сообщений: 4,011
	16.09.2019, 09:28	6
	Кот Борис, чтобы понять почему у Вас не работает так, как Вы хотите приведённого куска кода явно не достаточно, покажите всю процедуру воспроизведения. 0

SoftIce es geht mir gut 11270 / 4752 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	16.09.2019, 09:35	7
	Кот Борис, создайте список воспроизведения, и будет вам счастье. 0

@Кот Борис 0 / 0 / 0 Регистрация: 09.05.2019 Сообщений: 46
	16.09.2019, 12:21 [ТС]	8
	Если б я знал как, то этой темы бы тут не было 0

@MrCrown 1530 / 1478 / 322 Регистрация: 03.10.2012 Сообщений: 1,517
	16.09.2019, 13:21	11
	Сообщение от Кот Борис таймера обратного отсчёта нету Кот Борис, для чего? 0

@Кот Борис 0 / 0 / 0 Регистрация: 09.05.2019 Сообщений: 46
	16.09.2019, 14:58 [ТС]	12
	Чтобы знать, сколько осталось. В первом коде он есть, но ладно 0

Проигрывание музыки поочередно

Решение