[EN]Creating Media Player

[Lightness]

Media Player

 

 

The List Box will be the place for Files that you will add ... for the list box the code is:

(vb):
WindowsMediaPlayer1.URL = List1

 

The Command Button rename with " ADD File " and the code for it:

(vb):
Dim sFile As String


With CommonDialog1
    .[color=green]DialogTitle[/color] = [color=red]"Open Media..."[/color]
    .[color=green]CancelError[/color] = False
    .[color=green]Filter [/color]= [color=red]"All Suported Files"[/color]
    .[color=green]ShowOpen[/color]
    If Len[color=green](.FileName)[/color] = 0 Then
        Exit Sub
    End If
    sFile = .FileName

With List1
      .[color=green]AddItem[/color] sFile
End With
End With

 

 

- Its been a while since Ive been here

- Well i made this today when i was board

- Its a media player using API

- It play's mp3\wma\wmv

- For now maybe i will add divex to it later on

- Well for now the source stays with me till its a complete project..!

 

# a command button

# a list Box

 

Source Code: Download

 

  You need Virus Scan from application PM me and i give u via PM.