Visual Basic - codigo buscar

Life is soft - evento anual de software empresarial
   
Vista:

codigo buscar

Publicado por miguel (47 intervenciones) el 31/03/2008 19:38:13
hola que tal apenas empece a trabajar con visual basic hice un control de personal en el cual use access para llevar la base. tengo 3 formularios
1 tiene
clave
nombre
horario
puesto

en la 2 tengo
clave
nº trabajador
antiguedad
puesto

3 clave
nombre
horario
en los formularios 2 y 3 estan enlazados con la base pero el 1 es un fantasma es decir dede aqui jalo los datos de la 2 y la 3
para eso puse un boton de buscar me busca los datos y los jalo del 2 al 1 y del 3 al 1
el problema es que solamente me busca en un formulario como puedo hacer para que me busque en los 2 formularios es decir que coincidan los dos elementos
el codigo de buscar es el siguiente

Dim buscado As String, criterio As String
buscado = InputBox("indica la matricula que quieres buscar")
If buscado = "" Then Exit Sub
criterio = "trabajador like '*" & buscado & "*'"
Form3.Data1.Recordset.MoveNext
If Not Form3.Data1.Recordset.EOF Then
Form3.Data1.Recordset.FindFirst criterio
End If
If Form3.Data1.Recordset.EOF Then
Form3.Data1.Recordset.MoveFirst
Form3.Data1.Recordset.FindFirst criterio
If Form3.Data1.Recordset.EOF Then
Form3.Data1.Recordset.MoveLast
MsgBox ("no encuentro esa matricula")
End If
End If
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:codigo buscar

Publicado por lolo (163 intervenciones) el 31/03/2008 22:27:44
Pues aquí solamente vemos el Form3 (osea que el dos además del uno también es fantasma)

y creo que hay muchos Data1.Recordset.EOF

deberías revisar el código, y perdona que no te pueda ayudar porque realmente no se lo que quieres
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar