[MSaccess] Waarden zetten met dao in msaccess form

[Verwijderd]

Ik heb een doorlopend formulier. In dat formulier staan segmenten en in die segmenten zijn aantallen personen opgenomen. Dit aantal moet berekend worden en het schript daarvoor ziet er als volgens uit.
dim db as database
dim rs as doa.recordset
set db = currentdb()
set rs = db.openrecordset("SELECT count(contacten_id) as aantal FROM [contacten_segmenten] where segment_id = 2")
me.aantal(naam van textfield in doorlopend formulier) = rs(0)

Het probleem is nu dat als ik op een record klik, in alle velden aantal van het doorlopend formulier die waarde voor aantal gezet wordt van het huidige record, en dus niet alleen bij het record waar het bij hoort. Klik ik nu weer op een ander record dan veranderen alle aantal velden weer.
Wat kan ik hier tegen doen??, op een rapport werkt het wel met exact dezelfde methode.

[Boss]

Komt doot de techniek die ze gebruiken voor een subformulier. Die me.aantal verwijst tenslotte naar het huidige record.
Niets aan te doen.

[Verwijderd]

Klopt, niets aan te doen behalve een query met de juiste gegevens als bron voor het subformulier gebruiken. Dus eerst een groepeer/count-query maken om alles te tellen en die joinen aan de tabel/query die je al als bron gebruikte voor je subform. De nieuwe gejoinde query als bron gebruiken voor je subform.