Je hebt een paar foutjes gemaakt. Om te beginnen: de keuzelijst hoort niet in het formulier thuis, maar in de koptekst. Je gebruikt de keuzelijst namelijk om een persoon op te zoeken, niet om een persoon in te voeren. Dat kan ook niet, want de persoon die je aan het invoeren bent, kan nooit in de keuzelijst staan. Op een (invul)formulier gebruik je voor de in te vullen gegegens altijd tekstvelden, of datumvelden etc. Nooit keuzelijsten. Die gebruik je alleen als je gegevens uit een andere tabel haalt. Maar daar is hier geen sprake van.
Als je de keuzelijst verplaatst naar de koptekst, valt er een gat, want het veld [Naam] ontbreekt dan. Die moet je dus uit de eigenschap <Lijst met velden> halen.
Tweede punt: een keuzelijst kun je sorteren, bijvoorbeeld op naam. Dat is het enige veld in de keuzelijst, dus dat komt prima uit
. Je kiest dan in de query uiteraard Oplopend, want aflopend heeft weinig zin.
Derde punt: als je een nieuw record hebt toegevoegd en hebt opgeslagen, moet de keuzelijst dus ververst worden. Dat had ik al uitgelegd. Dat kan met dit stukje code:
Code:
Private Sub Keuzelijst120_Enter()
Me.Keuzelijst120.Requery
End Sub
Hiermee ververs je de keuzelijst als je hem selecteert, en doordat de query nu op Sorteren = Oplopend staat, klopt je lijst ook weer.