También se puede consultar sin necesidad de leer los datos en la hoja, esto quiere decir leyendo directo del archivo y trayendo los datos al formulario, en el siguiente ejemplo, se programa el botón consulta en formulario.
Dibuja el siguiente formulario, los dos primeros botones es el mismo código anterior, pero el tercer botón incluye el siguiente código:
Private Sub CommandButton3_Click()
Open "c:\datos.txt" For Input As 1
Do While Not EOF(1)
Input #1, nombre, direccion, telefono
If nombre = TextBox1 Then
TextBox2 = direccion
TextBox3 = telefono
End If
Loop
Close #1
End Sub
Solo corra el formulario y escriba el nombre que desea consultar y presione el tercer botón.
Usted podrá consultar cualquiera de los nombres que se encuentren dentro del archivo, sin necesidad de que existan en la hoja, claro esta que primero es necesario presionar el botón registro para archivarlos, pero después se pueden manipular.
Bueno espero que sea de su agrado esta parte y que practiquen mucho los archivos secuenciales.
|
1. Compartir información en Word 2003. Macros y entorno personalizado En este último curso de Word 2003 , vamos a ver la forma que tiene Word de... [23/11/10] |
860 | ||||
|
2. Presentaciones con Power Point El programa más empleado en el mundo para realizar presentaciones comerciales, el... [19/11/01] |
229.017 | ||||
|
3. Introducción al Access Hoy en día cualquier empresa, organización u asociación se enfrenta al manejo de... [03/12/01] |
232.435 | ||||
Cursos para compartir lo que sabes
