25/05/2005, 23:21
|
 | | | Fecha de Ingreso: marzo-2005
Mensajes: 288
Antigüedad: 20 años, 3 meses Puntos: 2 | |
Donde se encuentran los archivos de texto. ¿En la misma carpeta del programa?.
El problema es que no estas poniendo una ruta valida. y las condiciones no tienen ningun sentido(no asen falta ya que el nombre del archivo va aser el de el combo1.text)
En caso que los archivos esten guardados en la misma carpeta que la aplicación este seria el codigo:
List1.Clear
Open app.Path & "\" & Combo1.Text For Input As #1
Do While Not EOF(1)
Input #1, nombre
List1.AddItem nombre
Loop
Close #1
__________________
"No hay lenguaje de programación potente que sea inferior a otro semejante cuando existe un buen programador que lo defiende"
Yosvanis Cruz Alias VisualGuallabo
Ycruz
Última edición por VisualGuallabo; 25/05/2005 a las 23:36 |