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
nadie sabe como ayudarme??
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.
solo me interesa saber la extension del archivo,osea los 3 ultimos caracteres,pero no se como poder cojerlos
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
muxisimas gracias por responder,ya estaba medio loco buscando la manera de hacerlo.
Gracias :D