Microsoft Access
Datenaustausch zwischen Berichten und Formularen
Variablen nutzen
Sie können nun beispielsweise die Konstante strLizenz dazu nutzen, in Formularen ein Labelfeld namens lblDemo einzublenden, wenn die Konstante den Wert "Demo" hat. In allen anderen Fällen blenden Sie das Labelfeld aus, damit der Schriftzug nicht sichtbar ist, der die kommerzielle Nutzung des Berichts verhindern soll.
Dazu erstellen Sie eine Ereignisprozedur für das Format-Ereignis des Berichtsabschnittes (hier der Detailbereich), in dem sich das Labelfeld befindet. Innerhalb der Prozedur können Sie die Konstante abfragen und abhängig von deren Wert das Labelfeld ausblenden, indem Sie die Eigenschaft Visible
auf False setzen.
Falls Variablen initialisiert werden müssen, rufen Sie die Prozedur INIT
in der Ereignisprozedur Open
des Berichts auf.
Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
If Not (strLizenz = "Demo") Then
Me.lblDemo.Visible = False
End If
End Sub
Private Sub Report_Open(Cancel As Integer)
INIT
End Sub