Vb en checkboxes

[lge]

Ik loop een beetje vast met vb en wat checkboxes. Ik wil het volgende bereiken: Dmv het aanvinken van 1 of meerdere checkboxes moet er een query uitgevoerd worden. Tot nu heb ik de volgende code waarvan ik dacht dat zou moeten werken.

    Dim stDocName As String
    If Me!check1 = Checked Then
    stDocName = "query"
    End If
    DoCmd.RunMacro stDocName
    End Sub

check1 is de betreffende checkbox

Wat doe ik fout?

Ik werk met access (2003)

 

[ReneDirks]

Om te beginnen zou ik

DoCmd.RunMacro stDocName

maar vervangen door

docmd.OpenQuery stDocName