
10/11/2004, 08:35
|
| | | Fecha de Ingreso: junio-2004
Mensajes: 2
Antigüedad: 21 años, 4 meses Puntos: 0 | |
| Inserta los siguientes controles en un form:
DriveListbox
DirListBox
FileListBox
y pon los siguientes codigos:
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub |