R13.34 Access-Optionen abrufen/setzen

Aufgabe

Sie möchten Einfluss auf allgemeine Access-Optionen nehmen, diese Änderungen sollen allerdings nur für die aktuell zu öffnende Datenbank gelten.

Lösung

Verwenden Sie zunächst die GetOption-Methode des Application-Objekts um den aktuellen Status der Eigenschaft abzurufen und gegebenenfalls in einer globalen Variablen zu sichern. Nachfolgend können Sie mit SetOption den Wert verändern.

Quelltext

Erstellen Sie zunächst die beiden folgenden Funktionen in einem Modul:

Public Function Start() As Boolean
   Application.TempVars("FontName") = Application.GetOption("Default Font Name")
   Application.TempVars("FontSize") = Application.GetOption("Default Font Size")

Hinweis

Eine Liste der möglichen Optionen finden Sie in ...

Get Microsoft Access Programmierrezepte now with the O’Reilly learning platform.

O’Reilly members experience books, live events, courses curated by job role, and more from O’Reilly and nearly 200 top publishers.

Start your free trial