Como saber si el listbox tiene un mp3,un wav,avi u otro archivo

Iniciado por bautistasbr, 11 Septiembre 2006, 21:05 PM

0 Miembros y 1 Visitante están viendo este tema.

bautistasbr

Ola a todos.Sigo teniendo algunaas dudas con el reproductor,que espero q me solucioneis.

Como puedo hacer para q si en el list pongo un avi o mp3,al pinxar en ellos para reproducirlos,en un label me ponga un texto.
No se si me explico,q si por ejemplo es un mp3,en un label diga mp3,si es avi,q diga avi etc.


Espero vuestras respuestas y gracias por todo


Gorky

O no te he entendido o la respuesta es muy simple.

Obtienes el nombre del archivo sobre el que has hecho clic y posteriormente solo tienes que tomar los tres ultimos caracteres que son los que corresponden a la extension.

No se si es esto lo que preguntabas.

bautistasbr

solo me interesa saber la extension del archivo,osea los 3 ultimos caracteres,pero no se como poder cojerlos

SheKeL_C$

Dim ext As String


For i = 0 To List1.ListCount
   
    ext = Right(List1.List(i), 3)
    Select Case ext
        Case "avi": MsgBox "es una peli"
        Case "mp3": MsgBox "es musikita"
    End Select
Next i


Creo que t puedes acer una idea

~~

Hola:

Tambien puedes hacerlo asi:

Label1.Caption = Right(List1.List(List1.ListIndex), 3)

Te saldrá la extension del archivo seleccionado

1S4ludo

bautistasbr

muxisimas gracias por responder,ya estaba medio loco buscando la manera de hacerlo.

Gracias :D