jeanette
11 de Septiembre del 2002

Hola amigos del foro espero que me contesten este mensaje .

miren tengo un listbox que me muestra archivos de una
carpeta X .como sabemos no tiene las propiedades de filter
o pattern entonces ¿puedo forzarlo a que solo me muestra
archivos con extension txt .?

gracias amigos
jane
.

webJose
11 de Septiembre del 2002

Algo como esto:

private sub LlenarLista(byval strPath as string)

dim strTemp as string

list1.clear
strtemp=dir(strpath & "*.txt", vbnormal)
do while (strtemp<>"")
list1.additem nombrearchivo(strtemp)
strtemp=dir()
loop
end sub

La función NombreArchivo es una función que debe crearse. Solamente debe recibir un nombre de archivo con un path, y devolver el nombre del archivo sin el path.