Dag allen,
Ik heb een rapport met groepen gemaakt en dat werkt prima via de rapporten.
Het zou natuurlijk veel leuker zijn om via een formulier dit rapport te tonen en zelfs te selecteren. Daarom heb ik op een formulier een button en een textbox geplaatst.
Er zijn echter enkele problemen:
1) Als ik een selectie maak krijg ik een messagebox om deze parameter
te herhalen en indien ik annuleer krijg ik een fout melding.
2) Als ik geen selectie maak wil ik een messagebox tonen maar krijg
onmiddllijk een fout melding.
Het enige wat werkt is, als ik een volledige selectie opvraag.
Hier is de code:
Visual Basic code: Private Sub Command0_Click()
If Text5.Value = "volledig" Then DoCmd.OpenReport "Reeks", acViewPreview ElseIf Text5.Value = "" Then MsgBox "Selecteer eerst een reeks" Text5.SetFocus Else DoCmd.OpenReport "Reeks", acViewPreview, , "[Reeks]=" & Text5.Value End If
End Sub
Bedankt op voorhand. |