Programalama > VISUAL BASIC.NET

Etiketler: mp3, player

Ort. 0
Puan ver:
Public Class Form1

    Private Sub import_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles import.Click
        importdiag.ShowDialog()
        play.Show()
        stopbutton.Show()
    End Sub

    Private Sub importdiag_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles importdiag.FileOk
        For Each track As String In importdiag.FileNames
            playlist.Items.Add(track)
        Next
    End Sub

    Private Sub play_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles play.Click
        AxWindowsMediaPlayer1.URL = playlist.SelectedItem
    End Sub

    Private Sub stopbutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles stopbutton.Click
        AxWindowsMediaPlayer1.Ctlcontrols.stop()
    End Sub

    Private Sub pause_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        AxWindowsMediaPlayer1.Ctlcontrols.pause()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        play.Hide()
        stopbutton.Hide()

    End Sub
End Class


Yorumlar                 Yorum Yaz
Abdul-Samet-Cevik (0) Sakıncalı Yorum 01 September 18:14
NE KLİcez söylesene
KATEGORİLER
ASP - 240
ASP.NET - 24
C# - 75
C++ - 174
CGI - 8
DELPHI - 247
FLASH - 49
HTML - 536
PASCAL - 246
PERL - 11
PHP - 160
WML - 9
XML - 2
Copyright © 2002 - 2017 Hazır Kod - Tüm Hakları Saklıdır.
Siteden yararlanırken gizlilik ilkelerini okumanızı tavsiye ederiz.
hazirkod.com bir İSObil projesidir.