Ik heb een access formulier met een onafhankelijk veld om te zoeken, genaamd zoekveld. Aan dit zoekveld hangen 2 procedures, te weten:
Private Sub ZoekMaand_Click()
Me.Filter = "Maand = """ & Me.ZoekMaand & """"
Me.FilterOn = Me.ZoekMaand & "" <> ""
End Sub
EN
Private Sub ZoekMaand_AfterUpdate()
Me.subfrm_BEGROTING.Visible = True
End Sub
De rijbron van het zoekveld is: Januari";"Februari";"Maart";"April";"Mei";"Juni";"Juli";"Augustus";"September";"Oktober";"November";"December"
Met dit zoekveld kun je de gegevens van een bepaalde maand opzoeken die in een subformulier worden weergegeven.
Wat er gebeurt als je het formulier opent en in het zoekveld een bepaalde maand aanklikt krijg ik de een dialoog venster met de mededeling Parameterwaarde opgeven. Ik moet nu de gewenste maand opgeven. Als ik na deze exercitie nogmaals het zoekveld aanklik en een maand kies gaat het wel goed, zonder invulbox.
Wie kan mij helpen
Private Sub ZoekMaand_Click()
Me.Filter = "Maand = """ & Me.ZoekMaand & """"
Me.FilterOn = Me.ZoekMaand & "" <> ""
End Sub
EN
Private Sub ZoekMaand_AfterUpdate()
Me.subfrm_BEGROTING.Visible = True
End Sub
De rijbron van het zoekveld is: Januari";"Februari";"Maart";"April";"Mei";"Juni";"Juli";"Augustus";"September";"Oktober";"November";"December"
Met dit zoekveld kun je de gegevens van een bepaalde maand opzoeken die in een subformulier worden weergegeven.
Wat er gebeurt als je het formulier opent en in het zoekveld een bepaalde maand aanklikt krijg ik de een dialoog venster met de mededeling Parameterwaarde opgeven. Ik moet nu de gewenste maand opgeven. Als ik na deze exercitie nogmaals het zoekveld aanklik en een maand kies gaat het wel goed, zonder invulbox.
Wie kan mij helpen
Laatst bewerkt: