Jump to content

Inserir Várias Músicas numa ListBox


rafaelsantos
 Share

Recommended Posts

Boas,

estou aqui com uma duvida numa aplicação que estou a fazer, tem como função abrir musicas e depois torcar no objecto do media player que eu inseri no form. Consigo abrir com o openfiledialog um musica de cada vez. Como abro várias ao mesmo tempo por exemplo:

Tenho as musicas na minha pasta:

-- Linkin Park - Llalala

-- Nirvana - lalala2

-- Metalica - Lalalala3

Como abro todas ao mesmo tempo e as insiro na listbox.

Se precisarem do código digam.

Private Sub ofdmusica_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles ofdmusica.FileOk
        Dim nmmedia As String = ofdmusica.FileName
        Dim media As String
        Dim i As Byte
        nmmedia = StrReverse(nmmedia)
        For i = 4 To 75
            If nmmedia(i) <> "\" Then
                media = media & nmmedia(i)
            Else
                media = StrReverse(media)
                Exit For
            End If
        Next
        BindingSource1.Add(media & "                                                                @" & ofdmusica.FileName)
    End Sub  
Link to comment
Share on other sites

Olá e bem-vindo.

Podes tirar as tuas dúvidas acerca multi-selecção com este artigo da Wiki.

Básicamente basta passar a propriedade Multiselect para true e percorrer a colecção de strings que é devolvida através da propriedade Filenames ou SafeFileNames.

Dentro desse ciclo fazes o que bem quiseres com a informação, como por exemplo, adicionar numa listbox. Cada string armazenada na colecção representa o caminho absoluto de um ficheiro.

Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.