Ver Mensaje Individual
  #1 (permalink)  
Antiguo 20/04/2005, 11:41
El negrito
 
Fecha de Ingreso: abril-2005
Mensajes: 7
Antigüedad: 20 años
Puntos: 0
Negrito Novato

Hola buenas tardes, este novato esta dando sus primeros pasos aprendiendo VB leyendo apuntes de aqui y de alla. Y tratando de aplicar lo que voy aprendiendo, estoy haciendo una simple agenda para utilizarla en mi trabajo. El tema es que quiero hacer una busqueda solo de personas que vivan en "cordoba" y que lo muestre uno debajo de otro en un textbox, y no hay caso no me sale, lo maximo que legue a que muestre son 2 nombres, y despues no muestra mas nada, el codigo que puse en el button es:
Open "C:\medios.dat" For Input As 1
Do While Not EOF(1)
Input #1, medio
Input #1, capint
Input #1, prov 'campo a mostrar
Input #1, tmedio
Input #1, repre
Input #1, dire
Input #1, ejec
Input #1, teldto
Input #1, celu
Input #1, email
ProgressBar1.Value = 0
Timer1.Enabled = True
If prov = Text12.Text Then
Text11.Text = medio + Chr(10) + Chr(13)
End If
Loop
Close #1
Cualquier ayuda que puedan darme sera bienvenida.