Ayyıldız2 | 2008 TR Yapısı • 1-99 Orta Emek Destan • Oto Avsız • 10 Temmuz 21:00 HEMEN TIKLA!
Formumuza sadece 1 tane Combobox ekliyoruz ve 1 tanede Windows Media Player eklioruz.
Bilmeyen arkler için Wmp nasıl eklendğini anlatıyorum;
Toolbox'a gelip sağ tık yapıoruz.Choose items seçeneğine giriyoruz ve COM Components'den Windows Media Player'i ekliyoruz.
Combobox'a tıklayıp properties'inden collection'a giriyoruz.
Örnek olarak ben;
VirginRadioRadio5PowerFm giriyorum.
Sonra Combobox'a çift tıklayıp kod kısmına geçiyoruz;
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
If ComboBox1.SelectedItem = "VirginRadio" Then
AxWindowsMediaPlayer1.URL = "http://strm-1.tr.medianova.tv/RADIO_VIRGIN_LOW"
End If
If ComboBox1.SelectedItem = "Radio5" Then
AxWindowsMediaPlayer1.URL = "mms://84.16.235.95/r5"
End If
If ComboBox1.SelectedItem = "PowerFm" Then
AxWindowsMediaPlayer1.URL = "mms://xiphias.vargonen.net/PowerFm"
End If
End Sub
Bilmeyen arkler için Wmp nasıl eklendğini anlatıyorum;
Toolbox'a gelip sağ tık yapıoruz.Choose items seçeneğine giriyoruz ve COM Components'den Windows Media Player'i ekliyoruz.
Combobox'a tıklayıp properties'inden collection'a giriyoruz.
Örnek olarak ben;
VirginRadioRadio5PowerFm giriyorum.
Sonra Combobox'a çift tıklayıp kod kısmına geçiyoruz;
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
If ComboBox1.SelectedItem = "VirginRadio" Then
AxWindowsMediaPlayer1.URL = "http://strm-1.tr.medianova.tv/RADIO_VIRGIN_LOW"
End If
If ComboBox1.SelectedItem = "Radio5" Then
AxWindowsMediaPlayer1.URL = "mms://84.16.235.95/r5"
End If
If ComboBox1.SelectedItem = "PowerFm" Then
AxWindowsMediaPlayer1.URL = "mms://xiphias.vargonen.net/PowerFm"
End If
End Sub
Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)
Benzer konular
- Cevaplar
- 1
- Görüntüleme
- 474
- Cevaplar
- 0
- Görüntüleme
- 538
- Cevaplar
- 0
- Görüntüleme
- 395
