Formunuza resim yazısı "Gizle" olan "btn_gizle" adında buton ekleyip, bu butonun tıklandığında olayına aşağıdaki kodu ekleyiniz.
If Me.btn_gizle.Caption = "Gizle" Then
Call DoCmd.NavigateTo("acNavigationCategoryObjectType")
Call DoCmd.RunCommand(acCmdWindowHide)
Me.btn_gizle.Caption = "Göster"
ElseIf Me.btn_gizle.Caption = "Göster" Then
Call DoCmd.NavigateTo("acNavigationCategoryObjectType")
Call DoCmd.SelectObject(acTable, , True)
Me.btn_gizle.Caption = "Gizle"
End If
Ayrıca, uygulamanıza bu tür işlevlerin eklenme zaruriyeti doğabilir, ancak sizin önceliğiniz kod olayını çözmek olmalıdır.