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 O’Reilly online learning.

O’Reilly members experience live online training, plus books, videos, and digital content from 200+ publishers.