Lösungen

Die Eval-Funktion richtig nutzen

Eine nützliche, aber von vielen Access-Anwendern unbeachtete Funktion ist Eval. Sie dient dazu, einen Zeichenfolgen-Ausdruck auszuwerten. Lesen Sie in diesem Beitrag, wie Sie die Eval-Funktion effizient einsetzen und welche nützlichen Möglichkeiten sie bietet.

Ein Zeichenfolgen-Ausdruck wird prinzipiell so interpretiert, wie wenn Sie den Ausdruck im Direktfenster oder direkt im Code ausführen. Deshalb lässt sich die Funktion dann sinnvoll einsetzen, wenn beispielsweise der Benutzer die Möglichkeit haben soll, zur Laufzeit Befehle einzugeben, die dann ausgeführt werden sollen.

Mathematische Berechnungen

Das einfachste Beispiel ist die Berechnung einer Formel, die der Benutzer in ein Formular oder einen mit der InputBox erzeugten Dialog eingibt. Der dazu erforderliche Code (Listing 1) ist denkbar einfach. Zunächst wird der Variablen strFormel der Rückgabewert der InputBox-Funktion zugewiesen. Diese erzeugt das Dialogfeld in Bild 1, in das der Benutzer eine Formel eingeben kann.

Bild 1: Auszuwertende Formel.
Bild 1: Auszuwertende Formel.
Bild 2: Ausgabe des Berechnungsergebnisses.
Bild 2: Ausgabe des Berechnungsergebnisses.

Sub EingabeAuswerten()
Dim strFormel As String
strFormel = InputBox("Bitte geben Sie die Formel ein:")
MsgBox Eval(strFormel)
End Sub