Hola:
Tengo una base de datos Access y formularios en visual basic.
Un formulario(form1) está dedicado a información de peliculas, otro(form2) está dedicado a información de actores.

Tengo en el form1 un menú; si el usuario quiere ir al form2, éste se abra pero con la información del actor que se hace referencia en el form1, y no con cualquier actor.

cómo hacerlo. En el form1 tengo un textbox text10 con el id del actor y en el form2 tengo un textbox text9 con el id del actor.

Los comparo.. si ambos son iguales se me abrira el form2 de los actores con toda la información del actor en cuestión.

cómo se hace?

Antes de abrir Form2, pones esta línea:

__________________
José María Movilla Cuadrado
______________________

Visual Basic Videos Programacion Foro Programacion
Tutoriales Programacion Trucos Programacion Codigos Programacion

se me olvidaban algunas cosas. Soy principiante en visual basic y estoy ocupando el antiguo data control.

Por cierto la comparación que hago es:

If Form1.Text10.Text = Form2.Text9.Text Then

Form1.Visible = False
Form2.Visible = True
End If

pero la parte en que tiene que ir recorriendo los registros el data del form2 para
poder ir haciendo la comparación a medida que se recorre y poder encontrar el actor solicitado para la peli en cuestión. Saludos

Me resulta muy difícil interpretar tu redacción, y no llego a entender qué es lo que quieres.

Supongo que una vez definido el IdActor en Form2, en el Form_Load del Form2 no tienes nada más que hacer un Find (Data1.Recordset.FirstFind("IdActor = " & Text9), si este dato es numérico; o Data1.Recordset.FirstFind("IdActor = '" & Text9 & "'"), si es de tipo char...) y rellenar directamente los textboxes con los campos del Data1...

Ten en cuenta que te estoy contestando "de memoria"... y que hace muchos años que no manejo el control Data... Así que cuida de corregir mis errores. Y si no es eso lo que querías, haz el favor de escribirlo de forma más inteligible.

__________________
José María Movilla Cuadrado
______________________

Visual Basic Videos Programacion Foro Programacion
Tutoriales Programacion Trucos Programacion Codigos Programacion

gracias JM

:smt023 :smt023 :smt023 ... mira, es solo una consulta. Los datos ya están.. no hay que rellenar nada, la base de datos está completa.

Ahora lo haré como tu dices, y luego te cuento como me fué.

sabes... antes me había resultado con un código que puse, pero resulto una vez y luego cuando quise hacerlo se cayó la aplicación.

creo que lo que tu me dices está muy bien sólo que me falta saber como recorrer la tabla hasta que encuentre el código que busco´, .. o no?
:smt017 :smt017

aprovecho de preguntarte otra cosa:

hice esto,

Private Sub Form_Load()
Dim actor As String
While Not EOF

Find (Data1.Recordset.FindFirst("IdActor= " & Form1.Text10.Text))
If Form1.Text10 = Form2.Text9 Then
Form2.Visible = True


Next


End Sub
pero al ejecutarlo me dice que el argumento eof no es opcional... y plop! no se que me quieren decir con eso :smt017 :smt017

Es que pones unas líneas que no pueden sino darte errores... Prueba con sólo esto:
Y, por supuesto, no copies mis líneas sin estar seguro de que los nombres de las variables que yo te propongo son los que usas tú en tu proyecto...

__________________
José María Movilla Cuadrado
______________________

Visual Basic Videos Programacion Foro Programacion
Tutoriales Programacion Trucos Programacion Codigos Programacion

veo que pones EOF y no indicas el recordset ni finalizas el While, deberia ser asi:

While Not Recordset.EOF
codigo ...
Wend

ok... hice lo siguiente.. pero no me reten ok?

Private Sub Form_Load()
Dim actor As String

actor = Form1.Text10.Text
while not Form2.Data1.Recordset.EOF



Data1.Recordset.FindFirst ("idActor= " & Form1.Text10.Text)
If actor = Form2.Text9 Then
Form2.Visible = True

End If


wend


End Sub

y me aparece el sigte. mensaje:

Error 91 en tiempo de ejecución
Variable del tipo object o la variable del bloque with no está establecida ..

y yo .. quée!?? saben que enredo tengo? :smt017

No creo que hayas leído el mensaje que te puse últimamente, donde te decía textualmente
Te decía claramente Prueba con sólo esto... Pues no me explico porqué te empeñas en poner ese montón de líneas que no hacen otra cosa que generar errores... Creo que no te puedo decir las cosas más claras...

Si con sólo esa línea de Data1.Recordset.FirstFind("IdActor = " & Text9 no te funciona, comenta qué error te da y seguiremos intentando solucionar el problema.

__________________
José María Movilla Cuadrado
______________________

Visual Basic Videos Programacion Foro Programacion
Tutoriales Programacion Trucos Programacion Codigos Programacion