Pergunta : Seleção em segundo ou registro do terço em um formulário secundário

Olá!. Eu tenho um formulário principal que igualmente tenha um subform.
This que o formulário secundário manda aleatòria 3 nomes em it.

I querer poder no formulário principal em um campo seleciona o nome na primeira fileira. se esse nome é igual a um outro campo no formulário principal mim querê-lo selecionar o nome na segunda fileira e finalmente se o nome no primeiro e o segundo são no formulário principal mim querê-lo selecionar o nome no terceiro trajeto de row.

the do formulário principal ao nome no formulário secundário é:
[subform do qryRandomSalesPersonNext]. Formulário! O campo que de EmpID

the eu quero o nome no formulário principal ir dentro é chamado campo do txtRandom

The no formulário principal que verific para considerar se o nome já existe é chamado: o
FIRSTOwner
SECONDOwner

How pode mim fazer este? o
is possível no controle do txtRandom do campo olhar acima a �a fileira ou fá-la sempre retorno a fileira superior? class= do

Resposta : Seleção em segundo ou registro do terço em um formulário secundário

Olá!,

naturalmente você não pode ajustar um campo a um valor se já contem uma fórmula para o cálculo. Neste caso precisa de ser um campo vazio e unbound. E como este não é um campo conservado você pode usar o código acima no evento atual do formulário que ocorre em toda a mudança record no formulário principal.
Também, este código não trabalhará se você não tem pelo menos três registros em seu subform.

1. remover
= [subform do qryRandomSalesPersonNext]. Formulário! EmpID
do txtRandom

2. copiar este código em seu formulário principal:
Form_Current secundário confidencial ()
    Rs não ofuscantes como DAO.Recordset
    Ajustar rs = mim. [subform do qryRandomSalesPersonNext]. Form.RecordsetClone
    rs.MoveFirst
    Se Me.txt aleatório = Me.FIRSTOwner então
        rs.MoveNext
        Se Me.txt aleatório = Me.SECONDOwner então
            rs.MoveNext
        Terminar se
    Terminar se
    Se não (rs.EOF ou rs.BOF) então
        Me.txt aleatório = rs. Campos (“EmpID”)
    Terminar se
    Ajustar rs = nada
Terminar o submarino

então deve trabalhar.

Elogios,

Cristão