2 dudas, listbox y filelistbox

[pungados]

Buenas gente. Acabo de terminar mi primer reproductor de música usando MMC, y el ocx de Volume.
Ahora quería agregarle 2 cosas como yapa.
Una es para que por medio de un TextBox busque en un List Box, la palabra del TextBox, resumiendo, un buscador.
Y la otra, es que por medio de un FileListBox, puede agregar todos los temas que estan en una carpeta, y que tmb agregue los temas que puede haber dentro de otras carpeta que estan en la misma.
Las estuve pensando, y la verdad que no se me viene a la cabesa como hacerlo, por ahi es muy complicado para mi nivel, o bien necesito alguna API o otro OCX, la verdad no lo se.
Si alguno me da una mano estare bastante agradecido. 

Saludos

[seba123neo]

Hola, te podes ahorrar el OCX de multimedia Control y el de volumen que estas usando, si usas directamente Api's...para lo de la busqueda pues simplemente recorres el listbox y si encuentra lo que escribiste lo seleccionas...y para lo otro estoy pensando en una funcion recursiva que valla recorriendo cada directorio y agrege los archivos que pueda haber en cada uno..le podes poner una opcion que agrege los archvios que estan en una carpeta que le das a seleccioanr al usaurio o sino que meta todas las musicas que hay dentro de esa carpeta en N niveles...hay mcuhas formas...

saludos.

[pungados]

Se me ocurrio buscar en la lista usando esto

Código [Seleccionar] Expandir


for x = 0 to lista.listcount -1
if lista.list(x) = texto.text then
etc...
end if
next x

Pero si yo tengo por ejemplo:
Un tema se llama: 01-Cowboys From Hell.mp3
Si pongo en el buscador: CowBoys no me lo encuentra.
Osea que el usuario tiene que buscar la palabra exacta, sino no funciona.

Y no entendi los del FileListBox, es la primera ves que lo uso, y no me se muy bien sus propiedades.

Gracias

[h0oke]

Si no necesitas que el usuario ingrese completamente el nombre, podrías utilizar instr.

[pungados]

Si no necesitas que el usuario ingrese completamente el nombre, podrías utilizar instr.

Gracias no conocia la funcion ntsr

[seba123neo]

tambien de ultima podes buscar con SendMessage que es mucho mas rapido que recorrer el listbox..

Buscar en Listbox

saludos.

[pungados]

tambien de ultima podes buscar con SendMessage que es mucho mas rapido que recorrer el listbox..

Buscar en Listbox

saludos.

Gracias funciona perfecto, un par de retoques y listo. 

[BlackZeroX]

Para volumen puedes usar... Solo si usas comando MCI

IDSoundMCI: Puede ser 2 valores "All" o el nombre del Medio anteriormente abierto es decir su Identificador (Me parece que en unos post anteriores puse algo de esto)

Código (vb) [Seleccionar] Expandir

public function Volumen(IDSoundMCI as string,optional byval Value as integer =1000) as long
if IDSoundMCI="" then exit function
Value=iif(Value<0,0,iif(Value>2000,2000,Value))'Rango del Volumen de Sonido.
Volumen=mciSendString("setaudio " & IDSoundMCI & " volume to " & Value, 0, 0, 0)
end function

Es sencillo, aunque hay otras apis para el Volumen GENERAL (TODO) pero el del MCI es sencillamente para el medio actual!¡

Dulces Lunas