Fråga : Att välja understöder, eller thirdrekordet på en sub bildar

Hi. Jag har ett huvudsakligt att bilda som har också en sub för subform.
This att bilda på måfå har 3 namnger i it.

I önskar att vara kompetent på det huvudsakligt bildar i en sätta in väljer det känt i första ror. om det känt är jämbördigt till another, sätta in på det huvudsakligt bildar mig önskar det ska välja det känt i understödja ror, och slutligen, om det känt i första och understödja är på det huvudsakligt, bilda mig önskar att det ska välja det känt i den tredje banan för row.

the från det huvudsakligt bildar till det känt på suben bildar är:
[qryRandomSalesPersonNextsubform]. Bilda! EmpID

the sätter in mig önskar det känt på det huvudsakligt bildar för att gå in kallas txtRandom

The sätter in på det huvudsakligt bildar att den kontrollerar för att se, om känt finns redan kallas:
FIRSTOwner
SECONDOwner

How kan mig göra denna?
is den möjligheten på kontrollera av sätta intxtRandomen som upp ser 2nd, ror eller gör den alltid retur som det bästa ror? " klar "

Svar : Att välja understöder, eller thirdrekordet på en sub bildar

Hi,

naturligtvis du kan inte uppsättningen en sätta in till en värdera, om den innehåller redan en formel för beräkning. I detta fall den behöver att vara ett tomt, och obundet sätta in. Och som detta inte är sparad, sätta in dig kan använda kodifiera över i bildaströmhändelsen som uppstår på någon rekord- ändring i det huvudsakligt bildar.
Också detta kodifierar ska inte arbete, om du inte har åtminstone tre rekord i din subform.

1. ta bort
= [qryRandomSalesPersonNext subform]. Bilda! EmpID
från txtRandom

2. kopiera detta kodifierar in i ditt huvudsakligt bildar:
Privata underForm_Current ()
    Dunkla rs som DAO.Recordset
    Fastställda rs = mig. [qryRandomSalesPersonNextsubform]. Form.RecordsetClone
    rs.MoveFirst
    Om slumpmässiga Me.txt = Me.FIRSTOwner därefter
        rs.MoveNext
        Om slumpmässiga Me.txt = Me.SECONDOwner därefter
            rs.MoveNext
        Avsluta om
    Avsluta om
    Om inte (rs.EOF eller rs.BOF) därefter
        slumpmässiga Me.txt = rs. Sätter in (”EmpID”)
    Avsluta om
    Fastställda rs = ingenting
Avsluta suben

därefter den bör fungera.

Jubel,

Kristen