Vraag : Het selecteren van tweede of derde verslag op een subvorm

Hallo. Ik heb een hoofdvorm die ook een subform.
This heeft de subvorm willekeurig 3 namen in it.

I heeft op de belangrijkste vorm op een gebied willen kunnen selecteert de naam in de eerste rij. als die naam aan een ander gebied op de belangrijkste vorm gelijk is wil ik het de naam in de tweede rij selecteren en tenslotte als de naam in de eerste en de tweede op de belangrijkste vorm zijn die ik is het om de naam in de derde weg row.

the van de belangrijkste vorm aan de naam op de subvorm te selecteren heb gewild:
[qryRandomSalesPersonNext subform]. Vorm! Van EmpID

the- gebied ik de naam op de belangrijkste vorm wil gaan in genoemd txtRandom

The- gebied op de belangrijkste vorm die het controleert om te zien of er bestaat naam reeds wordt geroepen:
FIRSTOwner
SECONDOwner

How kan ik dit doen?
is het mogelijk op de controle van gebiedstxtRandom om omhoog de 2de rij te kijken of doet het terugkeert altijd de hoogste rij?

Antwoord : Het selecteren van tweede of derde verslag op een subvorm

Hallo,

natuurlijk kunt u geen gebied aan een waarde plaatsen als het reeds een formule voor berekening bevat. In dit geval moet het een leeg en unbound gebied zijn. En aangezien dit geen bewaard gebied is kunt u de code in de Huidige gebeurtenis van de Vorm hierboven gebruiken die bij de om het even welke verslagverandering in de belangrijkste vorm voorkomt.
Ook, zal deze code niet werken als u minstens drie verslagen in uw subform niet hebt.

1. verwijder
= [qryRandomSalesPersonNext subform]. Vorm! EmpID
van txtRandom

2. kopi�ër deze code in uw hoofdvorm:
Privé SubForm_Current ()
    Schemerige rs als DAO.Recordset
    Reeks rs = me. [qryRandomSalesPersonNext subform]. Form.RecordsetClone
    rs.MoveFirst
    Als Willekeurig Me.txt = Me.FIRSTOwner toen
        rs.MoveNext
        Als Willekeurig Me.txt = Me.SECONDOwner toen
            rs.MoveNext
        Eind als
    Eind als
    Als niet (rs.EOF of rs.BOF) Dan
        willekeurig Me.txt = rs. Gebieden („EmpID“)
    Eind als
    Reeks rs = niets
Sub van het eind

dan zou het moeten werken.

Juicht toe,

Christen