DECLARAR VARIABLE
Publicado por Edith (11 intervenciones) el 17/08/2007 19:54:17
Como puedo pasar el valor que tengo en el campo IdNomina de mi formulario 1 en el campo IdNomina2 que se encuentra en el subformulario.
Ejemplo.
IdNomina = 1 (este valor quiero que se almacene en el campo del subformulario)
IdNomina2 = 1
Tengo el siguiente codigo pero cuando mando un mensaje en el subformulario para ver si esta obteniendo el valor me sale CERO y no se por que.
CODIGO EN EL FORMULARIO 1
_________________________________________
Private Sub Plaza_AfterUpdate()
IdPresNomina.SetFocus
id2 = Forms!PresupuestoNomina!SubformConsultaDetallePresNomina!IdPresNomina.Value
men = MsgBox("LA CLAVE DEL PRESUPUESTO ES : " & id2, vbOKOnly, "Informacion")
End Sub
AQUI SI ME OBTIENE EL VALOR CORRECTO
_________________________________________
CODIGO EN EL SUBFORMULARIO
--------------------------------------------------
Private Sub Concepto_AfterUpdate()
men = MsgBox("LA CLAVE DEL PRESUPUESTO ES : " & i, vbOKOnly, "Informacion")
AQUI ME DICE QUE LA VARIABLE TIENE EL VALOR DE CERO
End Sub
Donde tengo que declarar la variable para que me respete el valor.
De antemano les agradesco su ayuda.
SALUDOS!!!!!!!!!
Ejemplo.
IdNomina = 1 (este valor quiero que se almacene en el campo del subformulario)
IdNomina2 = 1
Tengo el siguiente codigo pero cuando mando un mensaje en el subformulario para ver si esta obteniendo el valor me sale CERO y no se por que.
CODIGO EN EL FORMULARIO 1
_________________________________________
Private Sub Plaza_AfterUpdate()
IdPresNomina.SetFocus
id2 = Forms!PresupuestoNomina!SubformConsultaDetallePresNomina!IdPresNomina.Value
men = MsgBox("LA CLAVE DEL PRESUPUESTO ES : " & id2, vbOKOnly, "Informacion")
End Sub
AQUI SI ME OBTIENE EL VALOR CORRECTO
_________________________________________
CODIGO EN EL SUBFORMULARIO
--------------------------------------------------
Private Sub Concepto_AfterUpdate()
men = MsgBox("LA CLAVE DEL PRESUPUESTO ES : " & i, vbOKOnly, "Informacion")
AQUI ME DICE QUE LA VARIABLE TIENE EL VALOR DE CERO
End Sub
Donde tengo que declarar la variable para que me respete el valor.
De antemano les agradesco su ayuda.
SALUDOS!!!!!!!!!
Valora esta pregunta


0