Programación General > Visual Basic 6.0 e inferiores

 Duda Sobre Filelistbox

<< < (2/2)

MarXe:
Holas...

ArKaNtOs...mas que nada gracias por responder...
pero este proyecto no tiene nada que ver con la escuela...solamente es un proyecto personal que comense a mitad del año pasado y que se estanco por el no saber tener los recursos para poder solucionarlo

Solamente puse el codigo porque estube probando eventos en los cuales poner la solucion que erick185 y leandrog me propusieron... y me tiraba errores...

solo pido eso...

desde aca perdon por tu desagrado...y si queres cuando termine el proyecto te lo mando para decirme que opinas... :D

saludos!

MarXe

ArKaNtOs:
Hola Marxe bueno si no es el caso como tu mencionas entonces disculpame y para q veas q no hay enojo jejejeje hice un pequeño code :P


--- Código: Text --- Private Sub Dir1_Change()File1 = Dir1End Sub Private Sub Drive1_Change()Dir1.Path = Drive1.DriveEnd Sub Private Sub File1_PathChange()List1.ClearFor i = 0 To File1.ListCount - 1    List1.AddItem Left(File1.List(i), Len(File1.List(i)) - 4)NextEnd Sub Private Sub Form_Activate()Drive1.Drive = &#34;C:&#092;&#34;File1.Pattern = &#34;*.jpg;*.bmp;*.JPG;*.gif&#34;End Sub Private Sub List1_Click()Image1.Picture = LoadPicture(File1.Path & &#34;&#092;&#34; & File1.List(List1.ListIndex))End Sub  
lo unico que debes de hacer es insertar un dirlistbox, drivelistbox, filelistbox, image y un listbox y al filelistbox ponerle la propiedad visible=false

Navegación

[0] Índice de Mensajes

[*] Página Anterior