Cuestión : Selección en segundo lugar o expediente del tercero en una forma secundaria

Hola. Tengo una forma principal que también tenga un subform.
This que la forma secundaria hace aleatoriamente que 3 nombres en it.

I quieran poder en la forma principal en un campo selecciona el nombre en la primera fila. si ese nombre es igual a otro campo en la forma principal yo querer seleccionara el nombre en la segunda fila y finalmente si el nombre en el primer y el segundo son en la forma principal yo querer que seleccionara el nombre en la tercera trayectoria de row.

the de la forma principal al nombre en la forma secundaria es:
[subform del qryRandomSalesPersonNext]. ¡Forma! El campo de EmpID

the que quisiera que entrara el nombre en la forma principal se llama campo del txtRandom

The en la forma principal que comprueba para considerar si existe se llama el nombre ya: ¿el
FIRSTOwner
SECONDOwner

How puede yo hacer esto? ¿el
is posible en el control del txtRandom del campo mirar para arriba la 2da fila o la hace siempre vuelta la fila superior?
class= del

Respuesta : Selección en segundo lugar o expediente del tercero en una forma secundaria

Hola,

por supuesto usted no puede fijar un campo a un valor si contiene ya una fórmula para el cálculo. En este caso necesita ser un campo vacío y desatado. Y como esto no es un campo ahorrado usted puede utilizar el código arriba en el suceso actual de la forma que ocurre en cualquier cambio de registro en la forma principal.
También, este código no trabajará si usted no tiene por lo menos tres expedientes en su subform.

1. quitar
= [subform del qryRandomSalesPersonNext]. ¡Forma! EmpID
del txtRandom

2. copiar este código en su forma principal:
Form_Current secundario privado ()
    Rs déviles como DAO.Recordset
    Fijar los rs = yo. [subform del qryRandomSalesPersonNext]. Form.RecordsetClone
    rs.MoveFirst
    Si Me.txt al azar = Me.FIRSTOwner entonces
        rs.MoveNext
        Si Me.txt al azar = Me.SECONDOwner entonces
            rs.MoveNext
        Terminar si
    Terminar si
    Si no (rs.EOF o rs.BOF) entonces
        Me.txt al azar = rs. Campos (“EmpID”)
    Terminar si
    Fijar los rs = nada
Terminar el submarino

entonces debe trabajar.

Aclamaciones,

Cristiano
Otras soluciones  
 
programming4us programming4us