MyDesign | Kod Arşivi - Anasayfaya Dön   No banner in farm
Anasayfa Araştır Forum Gelişmiş Arama Siteniz İçin En Hit İçerikler RSS İçerik Ekle Scriptler Destekleyenler Kadromuz Reklam İletişim Giriş Sayfası Yap  Sık Kullanılanlara Ekle
Bu Kategorinin En Yeni Kodları:


Bu Kategorinin En Çok Görüntülenen Kodları:






Arama:
Gelişmiş Arama


No banner in farm



En Çok Görüntülenen Kodlar:


Üye Girişi:
 Üye Ol



Anasayfa > VB.Net > Kodlar

MP3 Çalar

DirectX9 bileşenleri ile beraber yüklü olması gerekmektedir eğer
bileşenleri yükleyemez iseniz ibisseref@hotmail.com'dan yardım isteyiniz

Kategori : VB.Net
Gönderen : seref
Telif :
Tarih : 13 Temmuz 2006
Örnek Dosya : İndir
Okunma Sayısı : 23069
Puan
: 9,8 / 10 (21 Oy)
Puan Verin :
Google Bookmarks  del.icio.us  Digg  Yahoo! MyWeb  Windows Live  Furl
 
 
Imports Microsoft.DirectX.AudioVideoPlayback



  'Bu programın çalışabilmesi için
    'References sağ tıklayıp Microsoft.DirectX.AudioVideoPlayback dahil edilmeli
    'Yardım için ibisseref@hotmail.com          www.vbkodindir.com
    Dim müzk As Audio
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim opfdlg As New OpenFileDialog
        opfdlg.Filter = "Mp3 dosyaları (*.mp3)|*.mp3"
        If opfdlg.ShowDialog = DialogResult.OK Then
            müzk = New Audio(opfdlg.FileName)
            müzk.Play()
        End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        müzk.Stop()
    End Sub
 
 

MP3 Çalar için yazılan yorumlar

ali pancar  { 03 Temmuz 2010 }
Form Penceresine Button1-buttoon2-openfiledalog1 ekleyin. sonra asagıdaki kodları yazın.


Imports Microsoft.DirectX.AudioVideoPlayback
Public Class Form1
Dim müzk As Audio
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim opfdlg As New OpenFileDialog
opfdlg.Filter = "Mp3 dosyaları (*.mp3)|*.mp3"
If opfdlg.ShowDialog = DialogResult.OK Then
müzk = New Audio(opfdlg.FileName)
müzk.Play()
End If
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
müzk.Stop()
End Sub
End Class
----
sonra Yukarda File-edit-viev gibi menüler var ordan Project i secin sonra Add Referance Diyin.

Karşınıza Bi Pencere Gelcek Ordan Microsoft.DirectX.AudioVideoPlayback i secin ok diyin HataLar gidicektir. Yapamayan arkadaşa tekrar yardım edebilirm ..

alipancar@live.com

Ali  { 03 Temmuz 2010 }
kardeş form penceresine button1-2 ve opnfle diyalog ekle

CaqrıHan   { 31 Mart 2010 }
Beyler Her seyi doqru bile yapmış olsanız Visual Basic de calıştırınca hata alırsınız.Kaydedip exe dosyasını calıştırın çalışacaktır.

mihrumah   { 24 Ocak 2010 }
kadeşlerim herşeyi devletten beklemeyinn birazda kendinizz deneyin yapmayı ben yaptım değişkanlerde ve kod yazım bölemünde hata vardı onu da hallattik

dadas   { 18 Aral�k 2009 }
kardeş bu (opfdlg) hata veriyor dimlede tanımlamışsın ama yinede hata veriyor yanlışlık var bu kodlarda...

Talha   { 01 Kas�m 2009 }
bu hata veriyor kodu çıkmıyor kardeş

İsmail   { 24 Ekim 2009 }
evet yha Hata Verio Nedennn..!

yasin   { 20 Nisan 2009 }
kardeşş bu bazı yerlerde hata verio bilen varsa açılasın deneyen varsa yanii

Yorum ekleyin

Anasayfa > VB.Net > Kodlar > MP3 Çalar
Kategoriler:


Forum:



Bağlantılar:


En Son Yorumlanan İçerikler:


Murat Yavuz | Site Haritası | Gizlilik Bildirimi | 54.92.164.184 | 0,12 Saniye
© Copyright 2004-2018 MyDesign | Kod Arşivi. Tüm Hakları Saklıdır.
MyDesign | Kod Arşivi, en iyi görünüm için, 1024x768 ve üzeri çözünürlük tavsiye eder.