10 lines
214 B
Plaintext
10 lines
214 B
Plaintext
Option Compare Database
|
|
Option Explicit
|
|
|
|
Private Sub Report_Close()
|
|
DoCmd.ShowToolbar "Datenbank", acToolbarNo
|
|
End Sub
|
|
|
|
Private Sub Report_Open(Cancel As Integer)
|
|
DoCmd.ShowToolbar "Datenbank", acToolbarYes
|
|
End Sub |